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PREFACE 


Intercomm is a state-of-the-art teleprocessing monitor, executing on the IBM 
System/390 family of mainframe computers and operating under the control of IBM 
Operating Systems (ESA and OS/390). Intercomm monitors the transmission of 
messages to and from terminals, concurrent message processing, centralized access to 
I/O files, and the routine utility operations of editing input messages and formatting output 
messages, as required. 


The Intercomm Installation Guide details the installation procedures for Intercomm 
Release 11. It is intended for systems programmers involved with general installation 
procedures and/or maintenance on a day-to-day basis for both new and ongoing 
installations. 

This manual describes standard job steps to accomplish installation of an 
Intercomm system, and provides references to the Intercomm technical publications for 


detailed specifications regarding implementation of all Intercomm features. The following 
Intercomm publications are prerequisite and/or relevant to this document: 


\ 
Planning Guide 
Concepts and Facilities 
Operating Reference Manual 
Basic System Macros 

and the appropriate Teleprocessing Network installation manuals: 
SNA Terminal Support Guide 
SNA LU6.2 Support Guide 
BTAM Terminal Support Guide 
TCAM Support Users Guide 


INTERCOMM PUBLICATIONS 


GENERAL INFORMATION MANUALS 


Concepts and Facilities 
Planning Guide 


APPLICATION PROGRAMMERS MANUALS 


Assembler Lanquage Programmers Guide 
COBOL Programmers Guide 
PL/1 Programmers Guide 


SYSTEM PROGRAMMERS MANUALS 


Basic System Macros 

BTAM Terminal Support Guide 
Installation Guide 

Messages and Codes 
Operating Reference Manual 
system Control Commands 


CUSTOMER INFORMATION MANUALS 


Customer Education Course Catalog 


Technical Information Bulletins 


User Contributed Program Description 


FEATURE IMPLEMENTATION MANUALS 


Autogen Facility 
ASME Users Guide 


DBMS Users Guide 


Data Entry Installation Guide 
Data Entry Terminal Operators Guide 
Dynamic Data Queuing Facility 
Dynamic File Allocation 
Extended Security System 

File Recovery Users Guide 
Generalized Front End Facility 
Message Mapping Utilities 
Multiregion Support Facility 
Page Facility 

store/Fetch Facility 

ONA Terminal Support Guide 
Table Facility 

ICAM Support Users Guide 


Utilities Users Guide 


EXTERNAL FEATURES MANUALS 


SNA LU6.2 Support Guide 


J 


Chapter 1 
1.1 
Chapter 2 
2.1 


2.2 
2.2.1 
2.3 


Chapter 3 
3.1 


Chapter 4 
4.1 


Chapter 5 
5.1 


TABLE OF CONTENTS 


INSTALLATION PLANNING 
Introduction 


PREPARATIONS FOR INSTALLING INTERCOMM 
Preinstallation Considerations 
The Intercomm Release Libraries 
Unloading the Intercomm Libraries 
Unloading the Intercomm JCL Procedures 


TABLE PREPARATION 
Introduction 
System Global Tables 
User Coded Intercomm Tables 
Table Coding for New Installations 
Table Revisions for Existing Installations 


ICOMGEN, MACRO 
Creating the Intercomm Generation Job Stream 


INSTALLATION JCL 
Executing the Generated JCL 
Job 02-Copy Tables, Allocate MDF Libraries 
Job 04-Allocate Disk Log Data Sets 
Job 06-BMN Back-off Installation 
Job 08-Assemblies for Extended TCAM 
Job 10-Assemble Common Front End Modules 
Job 12-BTAM Front End Assemblies 
Job 14-VTAM Front End Assemblies 
Job 15-LU6.2 External Feature Installation 
Job 16-Assemble System Modules 
Job 18-PL/1 Support Installation 
Job 20-Assemblies for MVS-Dependent Code 
Job 21-COBOL Assemblies and Install VS COBOL II 
Job 22-File Handler Assemblies 
Job 23-Install Dynamic File Allocation 
Job 24-File Handler Statistics Assemblies 
Job 26-Assemble Multiregion Facility Modules 
Job 28-Multiregion Table Assemblies 
Job 29-Create SYM/MODDYNL for Single Region System 
Job 30-Install Interregion MRSVC 
Job 31-Install Interregion IISVC 
Job 32-Install Extended Security System 
Job 34-Assemble System Tables 
Job 36-Relink Offline Utilities 
Job 38-Assemble SPA and SCT Tables 
Job 40-Assemble DDQ Facility Modules . 
Job 42-Create DDQ Data Sets 
Job 44-Assemble Edit/Output Utility Modules 
Job 46-Create Checkpoint File, Auto-Restart File 
Job 48-Create File Handler Statistics File 


fs 
it) 
@ 


—_ —, 
t 
—_ —, 


rt a 
OWN -— — 


I 
=_h oh 


hpoad 


oon 
REAMAGAAGAAGH BHR WHOWWWHW NMNNN)d 
(© CO NO 


CONMDAWH- OONADAWN-AOONAAWHNDH = 


WDWOWWWWWONNNYNMNMNMNMMHo&4 4 


AANA AANAAAAAAAaAaAAAAAG A 


5.29 
9.30 
9.31 
5.32 
9.33 
5.34 
9.35 
5.36 
5.37 
5.38 
5.39 
5.40 


Chapter 6 


Chapter 7 
7.1 
7.2 
7.3 


Chapter 8 
Chapter 9 


Chapter 10 
10.1 
10.2 
10.3 
10.4 
10.5 
10.6 
10.7 
10.8 


Chapter 11 


Chapter 12 
12.1 
12.2 
12.3 


Chapter 13 
13.1 
13.2 
13:3 


Chapter 14 
14.1 
14.2 
14.3 


Job 50-Page Facility Installation 

Job 52-Create Store/Fetch Facility Data Sets 
Job 54-Create Subsystem Disk Queue Data Set 
Job 56-Create Terminal Disk Queue Data Set 
Job 58-Load RCTOOO Data Set 

Job 60-Assemble DL/I Dependent Modules 
Job 62-Assemble Total DBMS File Table 

Job 70-Install Link Pack Facility 

Job 78-Allocate SYMINCL Linkedit Library 
Job 80-Generate Intercomm Linkedit Deck 
Job 85-Linkedit Intercomm Load Module 

Job 90-Generate Intercomm Execution JCL 


APPLICATION PROGRAMMING WORKSHOP PREPARATION 


VTAM OR TCAM FRONT END INSTALLATION 
VTAM 
VTAM LU6.2 Inter-Application Support 
TCAM 


EXTENDED CAPABILITIES INSTALLATION 
MVS INSTALLATION TUNING 


PRODUCT MAINTENANCE 
Introduction 
S.E. On Duty 
MSR Processing 
System modifications 
Technical Information Bulletins 
Early Warnings 
System Publication Revisions 
Field Engineering Support 


ORDERING NEW RELEASES 


RELEASE 9 CONVERSION 
Introduction 
Conversion Considerations 
Intercomm Dsect Changes and Additions 


RELEASE 10 CONVERSION 
Introduction 
Conversion Considerations 
Intercomm Dsect Changes and Additions 


RELEASE 11 CONVERSION 
Introduction 
Conversion Considerations 
Intercomm Dsect Changes and Additions 


vi 


LIST OF ILLUSTRATIONS 


1-1 System Installation and Staff Education 
1-2 Intercomm Customer Education Program 
2-1 RXINSTAL 

2-2 COPYPROX Job 


vil 


Chapter 1 


INSTALLATION PLANNING 


1.1 INTRODUCTION 


Intercomm Release 11 represents a new and significant level of code integrity and 
efficiency in the implementation of the on-line systems environment. A functional 
superset of previous Intercomm releases, Release 11 provides extensive new capabilities 
in message processing control, teleprocessing control, and system control functions. The 
Intercomm Planning Guide should be consulted for a review of new features and 
modifications to existing facilities. Please review that manual thoroughly prior to 
beginning installation. An Intercomm Systems Engineer may be scheduled to assist you 
in all phases of installation. 


The Intercomm installation process is a phased procedure which under Release 
11 is simplified by the provision of a customized 'sysgen’. An installation (for new users), 
a reinstallation, or an Intercomm or operating system upgrade which necessitates a 
reinstallation, consists of the following steps: 


1. Documentation familiarity: all users must read Chapter 2 of the Operating 
Reference Manual (Release 10 edition) to understand the importance of 
Intercomm library naming conventions, supplied JCL procedures, system 
standards and system table revisions. The new user should first read 
Chapter 1 of that manual and Concepts and Facilities. Users upgrading from 
Release 10 below SM Level 2300, or from a lower Release version, must first 
review the Release 10 Planning Guide for SM Level 2300 (seventh edition). 
All users must then review the Release 11 Planning Guide. 


2. Installation preparation: consists of reviewing this entire manual to gain a 
basic familiarity with the installation process and then proceeding to Chapter 
2 to confirm that preinstallation requirements are met. 


3. Unload the Intercomm release tape to disk (Chapter 2). 


4. Move Intercomm supplied JCL procedures to the system procedure library 
(Chapter 2). 


9. Study Intercomm table requirements and perform installation-dependent 
modifications to supplied tables (Chapter 3). 


6. Code and assemble the Intercomm sysgen macro ICOMGEN (Chapter 4). 


7. Review, modify if necessary, and submit the individual installation jobs 
generated by assembly of ICOMGEN (Chapter 5). 


For the existing Intercomm user, additional Release 11 conversion considerations are 
provided in Chapter 14, those for Release 10 are provided in Chapter 13 (prerequisite for 
converting from Release 9 or 10 to Release 11), and those for Release 9 are provided in 
Chapter 12 (prerequisite for converting from Release 9, or lower, to Release 11). 


Chapter 1 Installation Planning 


For the new user, the installation of the Intercomm system is a phased operation J 
concerning both systems and application programming personnel. A successful 

installation period includes education of personnel who will be involved with the system. 

Figures 1-1 and 1-2 illustrate the associated Intercomm education plan. 


For further details regarding Intercomm education, refer to the Intercomm 
Customer Education Course Catalog. 
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Figure 1-1. System Installation and Staff Education 
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Figure 1-2. Intercomm Customer Education Program 
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Chapter 2 


PREPARATIONS FOR INSTALLING INTERCOMM 


PREINSTALLATION CONSIDERATIONS 


When reinstalling, or if installing Intercomm for the first time, the user site must 
take the following preparatory steps: 


MVS Sysgen Specifications 


All the appropriate BTAM, VTAM and/or TCAM specifications for the terminal 
configuration must be followed. 


Direct Access Device Requirement 


A disk pack (3380 or 3390) initialized with VOL=SER=INT00O1. A different 
serial number may be used, if desired, and specified for the release tape 
unload job described in this chapter and for the ICOMGEN macro described in 
Chapter 4. 


Operating System PTFs and APARs 


Verify that all MVS PTF’s applicable to the installation terminal configuration 
have been applied. If using a 3380 or 3390 disk pack, all related IBM PTF’s 
must be applied. | 


Determine if any other PTF’s or APAR's are applicable, or if problems arise 
with non-IBM equipment, by reviewing the Intercomm manual Technical 
Information Bulletins. 


Installation Standard Naming Conventions 


Verify that all JCL described in this document meets the installation standard 
for library and data set naming conventions. If necessary, it is recommended 
that changes be made to data set names and Intercomm JCL procedures after 
the installation process is complete. Intercomm libraries may not be 
authorized, except the special load library created for ASMF execution. 


Existing installations should use a different high-level qualifier for Release 11 
or must rename existing Intercomm libraries and the RCTOOO data set. 


Macro Libraries 


Verify that all VTAM (and VSAM, BTAM and/or TCAM, if applicable) macros 
that generate source code and/or Dsects are contained on the installation 
SYS1.MACLIB (or equivalent). 


SYS1.AMODGEN is concatenated after SYS1.MACLIB in all Intercomm JCL 
procedures executing the Assembler (to assemble Intercomm modules), and 
therefore must be accessible. Note: this library may be _ called 
SYS1.MODGEN; and if so, modify Intercomm procs as necessary. 
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Chapter 2 


6. 


PRP 


are. 


Installation Preparations 


Network Configuration 


For a new installation: 


prepare a list of terminals specifying line address, polling characters, 
addressing characters, dial lists, etc. (see the BTAM Terminal Support Guide), 
or terminal type and network-id if a VTAM Front End is to be used; 


assign each terminal a unique five-character name; 


select one of the above terminals to be the Intercomm control terminal (the 
CPU console may be employed for this function). 


For an existing installation: 


the Front End Network Table may have to be modified to implement Release 
11 changes and enhancements. 


See also Chapter 7 for additional considerations if installing Intercomm with a 


TCAM or VTAM network. 


Source Statement Libraries 


Several members of the SYMREL source library are provided to copy into 
COBOL or PL/1 application programs. If the Intercomm JCL procedures for 
compilation are not used, verify that a block size of 6160 is acceptable to the 
installation JCL procedures. Consult the Intercomm application Programmers 
Guides for applicable member names to copy to your installation source 
statement library. For PL/1 users, a job step is provided to copy the source 
members to an Intercomm data set (SYMPL1). 


THE INTERCOMM RELEASE LIBRARIES 


Intercomm is released as three program libraries on magnetic tape. The libraries 


INT.SYMREL 


Symbolic form of the standard Intercomm release, Special Features (as 
ordered), Macros, Dsects, and JCL Procedures. 


INT. MODREL 

Load Module form of the standard Intercomm release and Special Features. 
INT.SYMUCL 

Symbolic form of the Intercomm User Group Contributed Program Library. 
Documentation for these programs is in User Contributed Program 


Description. Additions to the library are announced by a mail distribution to all 
installations. 
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Chapter 2 


Installation Preparations 


2.2.1 Unloading the Intercomm Libraries 


The libraries are loaded to disk in the order INT.MODREL, INT.SYMUCL, 
INT.SYMREL from the Intercomm release tape. Note that the block size of the data sets 
on the new pack must be identical to the original data sets. All data sets on the tape are 
blocked 6160. Key in the unload JCL (RXINSTAL) illustrated in Figure 2-1, then consider 
the following: 


Modify the JOB statement to site standards. 


JCL assumes a dedicated disk pack of the 3390 type with a volser of INTO01. 
If a different disk pack size is used, SPACE allocations must be appropriately 
modified. A 3390 contains 15 tracks per cylinder, and holds 45 directory 
blocks per track. 


RXINSTAL allocates and catalogs installation libraries on the disk pack 
identified by the INT DD statement which may be modified to system 
requirements along with the COPY statements that follow the SYSIN DD 
statement. 


INT.SYMREF is a dummy data set for which only one track is allocated with a 
block size of 32760. The Intercomm assembly procedures refer to this data 
set as the first of a series of concatenated libraries in order to resolve 
blocksize differences between Intercomm and system libraries. For an ESA or 
OS/390 system, this library is not needed. However, the Intercomm Procs 
(see Figure 2.2) must be changed to omit the data set for SYSLIB references. 


DEN on DD statement T has been omitted (not needed for tape cartridges). 
Also change the VOL=SER parameter to that for the provided tape, and 
change the UNIT parameter if a specific device type (not TAPE) is needed. 


The COPY statements which follow the SYSIN DD statement may require 
modification as follows: 


SYSDA=INTOO1 - Change SYSDA to the device type of the disk pack 


and/or change INTQQ1 to the disk pack volser defined 
for the INT DD statement. 


FROM=TAPE - Change the generic name TAPE to a device type if a 


specific device type is required. 


TAPE=(T1,n) - Change T1 to the appropriate tape volser. 


RENAME=XXxX.name - If a special high-level qualifier naming convention is 


required, change the DSN on the DD statements and 
change the RENAME parameter on the COPY 
statements to match. IEHMOVE will then unload the 
files into those data sets specified by XXX.name. The 
lowest level name must conform to Intercomm library 
requirements. 
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//RXINSTAL JOB 
/{* 
//INT1 EXEC PGM=IEHMOVE , REGION=2048K 
//SYSPRINT DD SYSOUT=A 
//SYSUT1 DD UNIT=SYSDA,SPACE=(TRK, (10,2)) 
//INT DD UNIT=SYSDA,DISP=OLD , VOL=SER=INT001 
/ /SREF DD DSN=INT.SYMREF, 
// VOL=REF=* . INT, DISP=(,CATLG) , SPACE=(TRK, (1,0,1)), 
// DCB= (RECFM=FB , LRECL=80 , BLKSIZE=32760 , DSORG=PO) 
//SLIB DD DSN=INT.SYMLIB, 
VOL=REF=* . INT ,DISP=(,CATLG) , SPACE= (CYL, (20,2,45)), 
DCB= (DSORG=PO , RECFM=FB , BLKSIZE=6160 , LRECL=80) 
DD DSN=INT.SYMUSR, 
VOL=REF=* . INT, DISP=(,CATLG) , SPACE= (CYL, (10,2,25)), 
DCB= (DSORG=PO , RECFM=FB , BLKSIZE=6160 , LRECL=80) 
DD DSN=INT.MODLIB, 
VOL=REF=* . INT, DISP=(,CATLG) , SPACE= (CYL, (3,1,45)), 
DCB= (DSORG=PO , RECFM=U , BLKSIZE=6160) 
DD DSN=INT.MODUSR, 
VOL=REF=* . INT, DISP=(,CATLG) , SPACE= (CYL, (3,1,25)), 
DCB= (DSORG=PO , RECFM=U , BLKSIZE=6160) 
DD, DSN=INT.SYMREL, 
DISP=(,CATLG) , SPACE=(CYL, (40,2,60)), 
DCB= (DSORG=PO0 , RECFM=FB ,, BLKSIZE=6160 , LRECL=80) , 
VOL=REF=*. INT 
DD DSN=INT.MODREL, 
DISP=(,CATLG) , SPACE=(CYL, (7,1,80)), 
DCB= (DSORG=PO , RECFM=U , BLKSIZE=6160) , 
VOL=REF=* . INT 
DD DSN=INT.SYMUCL, 
DISP=(,CATLG) ,SPACE=(CYL, (1,1,5)), 
DCB= (DSORG=PO , RECFM=FB , BLKSIZE=6160, LRECL=80) , 
VOL=REF=* . INT 
DD DSN=T,DISP=(OLD,PASS) , 
VOL=SER=T1 , UNIT= (TAPE, , DEFER) , LABEL=(,BLP) , 
DCB= (RECFM=FB , BLKSIZE=800 , LRECL=80 , TRTCH=NOCOMP) 
//SYSIN DD * 
COPY PDS=INT.MODREL , TO=SYSDA=INTOO1 , FROMDD=T , FROM=TAPE=(T1,1), 
RENAME=INT .MODREL , CATLG 
COPY PDS=INT.SYMUCL, TO=SYSDA=INTOO1, FROMDD=T , FROM=TAPE=(T1,2), 
RENAME=INT . SYMUCL , CATLG 
COPY PDS=INT.SYMREL, TO=SYSDA=INTO01,FROMDD=T , FROM=TAPE=(T1,3), 
RENAME=INT. SYMREL , CATLG 


// 


Figure 2-1. RXINSTAL 
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2.3. UNLOADING THE INTERCOMM JCL PROCEDURES 


The released SYMREL library contains a JCL member COPYPROX (see Figure 2- 
2) which must be used at this time to move required Intercomm supplied JCL procedures 
to the system procedure library (SYS1.PROCLIB), or an Intercomm procedure library pre- 
allocated by the user for this purpose. The procedures to be moved are described in 
Chapter 2 of the Operating Reference Manual. Before submitting the COPYPROX JOB, 
consider the following: 


e The JOB statement should be altered according to your installation 
requirements. 


e On the SYSUT1 DD statement, the DSN file name prefix (INT) should be 
changed if not your installation standard. 


e On the SYSUT2 DD statement the DSN file name prefix (SYS1) should be 
changed if not your installation standard. 


e Add REPRO statements for any other Intercomm procs described in Chapter 2 
of the Operating Reference Manual which you may wish to use. 


e Delete the REPRO statement for ASMOC if no object libraries are used at the 
installation (that is, only source and load libraries are used). 


e Delete REPRO statements for the COBOL and/or PL1 procedures if not 
applicable to your installation. 


e Note that compile (COB2PC) and compile and linkedit (COB2PCL) procs have 
been added for VS COBOL II users. If VS COBOL II is (or will be) used, then 
change SYS1.COBLIB to SYS1.COB2LIB in the LKEDT proc (when support is 
installed). 


e After unloading the procs, it may be desirable to increase the region size (to a 
multiple of 1M) for the ASM step and (to a multiple of 2M) for the LKED step in 
the ASMPCL proc for use with a large Network and/or Station Table, and also 
(to a multiple of 2M) for the LKEDP and LDEDT procs. Add the OVLY parm to 
the LKEDP and LKEDT procs if an overlay linkedit structure is used. 
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//COPYPROX JOB 

//* 

//* COPY CATALOGED PROCEDURES ONTO SYS1.PROCLIB 

if? 

//S10 EXEC PGM=IEBUPDTE 

//SYSUT1 DD DSN=INT.SYMREL,DISP=SHR 

//SYSUT2 DD DSN=SYS1.PROCLIB,DISP=OLD 

//SYSPRINT DD SYSOUT=A 

//SYSIN DD * 

REPRO THE FOLLOWING PROCS FOR HLASM (HI-LEVEL ASSEMBLER) 


_* 
-/ 
./ 
-/ 
-/ 
./ 
-/ 
/ 
_* 
./ 
./ 
f 
./ 
a7 
of 
./ 
/ 
./ 
-/ 
./ 
-/ 
./ 
-/ 
-/ 
./ 


REPRO 
REPRO 
REPRO 
REPRO 
REPRO 
REPRO 
REPRO 


REPRO 
REPRO 
REPRO 
REPRO 
REPRO 
REPRO 
REPRO 
RE PRO 
RE PRO 
REPRO 
REPRO 
RE PRO 
REPRO 
REPRO 
REPRO 


NAME=ASMOC , LIST=ALL 
NAME=ASMPC , LIST=ALL 
NAME=ASMPCL, LIST=ALL 
NAME=LIBEASM, LIST=ALL 
NAME=LIBELINK , LIST=ALL 
NAME=SYMGEN , LIST=ALL 
NAME=DEFSYM, LIST=ALL 


THE FOLLOWING PROCS USED AS NEEDED 


NAME=LIBE , LIST=ALL 
NAME=LKEDP , LIST=ALL 
NAME=LKEDT , LIST=ALL 
NAME=PMIPRT, LIST= 
NAME=PMIPRT1,LIST=ALL (CONTROL STATEMENT FOR PMIPRT) 
NAME=PMIPCH , LIST=ALL 

NAME=PMIPCH1,LIST=ALL (CONTROL STATEMENT FOR PMIPCH) 
NAME=COBUPC , LIST=ALL 

NAME=COBUPCL, LIST=ALL 

NAME=LIBECOBL , LIST=ALL 

NAME=COB2PC , LIST=ALL 

NAME=COB2PCL , LIST=ALL 

NAME=PLIXPC , LIST=ALL 

NAME=PLIXPCL , LIST=ALL 

NAME=INTASMF , LIST=ALL 


\ 


Figure 2-2. COPYPROX Job 
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TABLE PREPARATION 


3.1 INTRODUCTION 


Intercomm is a table driven system in that the user must code tables to describe 
the terminals for the on-line teleprocessing network, the transaction codes to be entered, 
the user application programs which are to process the message text entered with the 
transaction codes, etc. Critical tables are described in Chapter 1 of the Operating 
Reference Manual; all tables are listed in Appendix A of that manual. Tables to be used 
in the on-line environment must be coded prior to completion of the installation process. 


In addition, a number of Intercomm modules are conditionally assembled based 
on system global tables which must be modified by the user to provide such information 
as the type of TP network in use, the SVC to be used, and whether or not certain 
Intercomm support features are to be used (generated). These assemblies are 
necessary because, for example, BTAM macros may not be available in a VTAM-only 
environment, etc. The global tables are described at the end of Chapter 2 of the 
Operating Reference Manual. The global tables must be modified to installation 
requirements before proceeding further with the installation process. 


NOTE: in this manual, MVS refers to MVS/ESA and to OS/390. Therefore, the operating 
system definitions have been removed from INTGLOBE and SETGLOBE. Also, 
the RM and RMPOOLS globals been removed. The global BMNOLD has been 
added for existing users that require the old Release 9 2-byte BMN number in the 
Intercomm message header (see Job 06 in Chapter 5). 


3.2 SYSTEM GLOBAL TABLES 


The following system global tables which contain SET statements must be copied 
(use STATS OFF and NUM ON when copying via ISPF) from SYMREL to SYMLIB and 
then modified to installation requirements: 


e SETGLOBE - see Operating Reference Manual and above NOTE 


e SETENV -see BTAM Terminal Support Guide 
e LOGSETGB - see Operating Reference Manual 
e DDQENV -see Dynamic Data Queuing (if used) 


Do not change the sequence numbers or renumber these tables because future System 
Modifications (SM's) to the tables will not be correct. An existing installation should 
review the old version of these tables and the new descriptions of each individual global 
before changing any setting. A new installation should only modify SETGLOBE. For all 
installations, if a BTAM and/or Extended TCAM Front End will be used in addition to 
VTAM, modify SETENV to generate support only for the features and device types which 
the user expects to use. 
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3.3 USER CODED INTERCOMM TABLES 


Certain tables are required for Intercomm execution, others are feature (facility) 
dependent and are to be coded when the feature is installed. 


Required tables for all Intercomm regions (including Test Mode) are: 


e INTSPA (SPALIST macro) - System Parameter Area 


INTSCT (SYCTTBL macro) - Application program (subsystem) definitions 
e PMISTATB (STATION macro) - Back End terminal descriptions 
e PMIDEVTB (DEVICE macro) - Back End device type definitions 
e PMIVERBS (VERB, etc. macros) - Edit Utility definitions 
e NEWPOOLS (ICOMPOOL macro) - Intercomm 24-Amode core pools 
In addition, for Intercomm regions containing a TP interface: 
e BTVRBTB (BTVERB macro) - Transaction Eade (verb) definitions 
e Network Table - Terminal/line and/or Logical Unit descriptions 


e BTAMSCTS (SYCTTBL macro) - BTAM/TCAM queue descriptions 
(optional) 


e VTIDTABL (VTIDTAB macro) - VTAM terminal name correspondence 
(optional - may now be coded on LUNIT macros) 


e PMIBROAD (BCGROUP macro) - Broadcast terminal groups (optional) 

Examples of Network Table coding for a BIAM Front End are provided in 
BTSAMP and for a VTAM Front End in VISAMP. These members are on SYMREL. For 
the new user, a starter table called FENETWRkK is also provided. 

For other tables automatically included in the Intercomm linkedit, the released 
version should be used unless an existing installation has already modified them. In this 


case, the user modification must be reapplied to the released version and placed on 
SYMUSR. 


User additions to tables containing required |Intercomm entries have been 
simplified by the provision for COPY members which the user must code. These are: 


e USRSCTS (for INTSCT) 

e USRBTVRB (for BTVRBTB) 

e USRVERBS (for PMIVERBS - Edit Utility processing) 

e USRSUBS (for REENTSBS - user subroutine definitions) 
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All user coded or user modified tables must be placed on SYMUSR and 
assembled and linkedited to MODUSR. Do not place user modified modules or tables 
(except system global tables) on SYMLIB (or MODLIB) nor on SYMREL (or MODREL). 


3.3.1 Table Coding for New Installations 


For the new user, installation job 02 (see Chapter 5) copies the released versions 
of the above tables to SYMUSR. Further action to be taken after executing that job is 
described therein. The NEWPOOLS module may be used as is until the user learns how 
to tune the pools for optimum usage. Assemblies of the tables are performed in later 
jobs. For future table assemblies, the user should use the Intercomm supplied ASMPCL 
or LIBELINK JCL procedures. 


For special features and facilities implemented at installation time, released table 
versions are copied to SYMUSR and assembled in the applicable installation jobs. These 
tables will need later modification as the user learns how to use the facility. 


3.3.2 Table Revisions for Existing Installations 


Ae 


Existing installations converting to Release 11 must perform the following prior to 
proceeding further with the installation process: 


1) Copy existing versions of Intercomm tables to the new SYMUSR, then 
modify or recode them as described below. 


2) If upgrading from Release 9, PMISPA and SPAEXT no longer exist and 
are not to be used. If not already done for Release 10, code all SPALIST 
macro parameters in one module named INTSPA (Csect SPA) as 
described in the Operating Reference Manual, Chapter 3. Different 
versions of INTSPA (different module names) are to be created in a 
Multiregion environment. The sample INTSPA (or CRSPA, SR1SPA and 
SR2SPA for Multiregion) on SYMREL may be modified and placed on 
SYMUSR. 


3) lf not already done for Release 10, move all user SYCTTBL macro coding 
from the old PMISPA to a COPY member called USRSCTS placed on 
SYMUSR. 


Delete SYCTTBL entries from USRSCTS (etc.) for Intercomm subsystems 
which are in the supplied INTSCT (single region Intercomm) or CRSCT, 
SR1SCT and SR2SCT (Multiregion Intercomm). The GENINDEX and 
PCENSCT macros are already coded in the supplied INTSCT, etc. Do not 
code them in USRSCTS. Refer to Basic System Macros to determine 
obsolete parameters that may be deleted from SYCTTBL macro coding. 
See job 38 in Chapter 5 for further considerations. 


If the RESOURCE macro was previously used, copy INTSCT (or CRSCT, 
SR1SCT, SR2SCT as applicable) to SYMUSR and insert the macro coding 
after the first SCT CSECT statement and before COPY SCTLISTC and the 
Intercomm SYCTTBL macros. Delete the //[ASM.SYSIN DD statement 
from the applicable assembly step(s) in job 38. 
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4) 


9) 


6) 


‘) 


8) 


9) 


10) 


11) 


Table Preparation 


If not already done for Release 10, ensure the BTVRBTB module has been 
separated into two modules containing a) the BTVERB macros and called 
USRBTVRB, and b) the Network Table macros in a user named member. 
If executing with a VTAM Front End, the VTIDTAB macro table may 
optionally be moved to a third member called VTIDTABL (or delete the 
INCLUDE statement in the linkedit deck generated in job 80). Then, in 
USRBTVRB, delete the Csect statement, BT'VERB macro entries for 
Intercomm verbs supplied in the released BTVRBTB, and the trailing 
PMISTOP macro. Finally, delete the old BTVRBTB table. 


In the Network Table, implement new parameters (if desired) which are 
described in the Planning Guide, Basic System Macros, and terminal 
support guides. Also, if local 3270 BTERMs are defined, the OP2, 
OP2IND and OP2RPL parameters should be deleted from the associated 
BDEVICE macro(s). 


lf SUBMODS macros were added to REENTSBS under Release 9 or 10, 
then move them to the COPY member USRSUBS. Delete the old 
REENTSBS. 


If user coded entries exist in the Release 9 or 10 PMIVERBS for non- 
Intercomm verbs, then move them to the COPY member USRVERBS. 
Delete the old PMIVERBS. 


Replace the Release 9 or Release 10 version of PMIFILET with the 
Release 11 version on SYMUSR; add user file entries if the 
Change/Display Utility is used, delete (or comment out) entries for the 
following Intercomm files if not used: DESOOO, VRBOOO, SEC000. Note 
that the block size for RCTOOO is increased for Release 11 (see job 58). 


If not already done, recode the STATION macro IOCODE parameter (in 
PMISTATB) and DEVICE macro TYPE parameter (in PMIDEVTB) to use 
MMU device type names (even if MMU not presently used in your system). 
Use the DVMODIFY macro for defining 3270-type devices with alternate 
(or larger than 1920-byte) buffers. 


Before executing job 85 (Intercomm linkedit), all user tables containing 
Intercomm macros for which assembly steps are not generated must be 
reassembled and linked to the new MODUSR. Other tables may be 
relinked from the Release 9 or Release 10 MODUSR to the Release 11 
MODUSR - use the LKEDP procedure and specify: 

/LKED.SYSLIN DD DSN=release-nn-MODUSR (table-name). 


For Release 11, the COREACCT macro previously coded in the 
MANAGER module under Release 9 must now precede the ICOMPOOL 
macros in the pools table(s), see job 34. Also, use COREACCT CSECT, 
not ICOMINX CSECT (before the COREACCT macro definition). After 
several days of executing under Release 11, retune the Intercomm core 
pools (member NEWPOOLS or as user-defined) for each Intercomm 
region. 


For Release 11, the Page Facility PAGETBLE (and Page Data Sets) no 


longer exist (replaced in Release 10 at SM Level 2300 with dynamically 
generated tables). Do not copy PAGETBLE to the Release 11 SYMUSR. 
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12) For Releases 10 and 11, the TUNERTBL formerly used by the Fine Tuner 
system commands is no longer used. Do not copy the TUNERTBL to the 
Release 11 SYMUSR (if upgrading from Release 9 or lower). 


Chapter 4 


ICOMGEN MACRO 


4.1 CREATING THE INTERCOMM GENERATION JOB STREAM 


The ICOMGEN macro is used to generate a JCL job stream tailored to the user’s 
specific Intercomm installation/reinstallation requirements. 


Assembly of the ICOMGEN macro produces a customized job stream to be used 
for: 
e assembly and linkediting of various Intercomm modules and user coded or 
user modified tables 


e allocation and loading of necessary Intercomm data sets 


e linking the Intercomm execution loac, module via ICOMLINK macro generated 
decks which are tailored to the user's specifications (see Basic System Macros 
for a detailed description of the ICOMLINK macro) 


e execution of the Intercomm system. 


The parameters of the ICOMGEN macro combine with the settings within the 
SETENV and SETGLOBE global table members to produce the installation job stream. 
Therefore, the released versions (on SYMREL) of SETENV and SETGLOBE must be 
modified for the installation environment and placed on SYMLIB (for ASMF), and 
optionally on SYMUSR, prior to assembly of ICOMGEN. 


To assemble the [COMGEN macro, use the following JCL: 


H/ASMGEN EXEC ASMPC,DECK=DECK,Q=USR,NAME=ICOMGEN 
HASM.SYSIN DD * 
ICOMGEN parameters 
END 
IISYSPUNCH DD SYSOUT=B,DCB=BLKSIZE=80 
| 


Substitute a TSO or CMS data set for the SYSPUNCH output, as desired. Code the P 
parameter for ASMPC if the SYMUSR (etc.) high-level qualifier is other than the default 
INT. 


The produced JCL stream consists of many separate conditionally generated jobs. 
Each job is delimited by a // statement. Therefore, the entire job stream should be divided 
into the individual jobs listed in the next chapter and submitted separately. Care should 
be taken not to saturate the operating system with too many assemblies at one time. 
Accordingly, single-threading the assembly jobs is recommended. 
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For parameter descriptions listed below, unless otherwise noted, coding YES generates 
the JCL statements associated with the facility; NO excludes the facility from the 
installation job stream. A bullet ( « ) indicates parameters related to system features 
which may require additional specifications for implementation. For each feature, the 
Intercomm manual which describes the use and installation of that feature is named. The 
form of the ICOMGEN macro is as follows: 


(blank) ICOMGEN JOB-statement definition parameters: 


[ JOBACCT={acct} ] Job accounting 
[ { ICOM} ] information 


[, JOBCLAS={class}] Job class 
[ {A }] 


[, JOBNAME={name_ }] Jobname prefix 
[ { ICMGEN} ] 


[ , JOBPGNM= {name }] Programmer name 
[ { GENICOM} J Job field 


Procedural-parameters: 


[ ,GEN= {NEW} ] Intercomm 
[ {OLD} ] installation type 


[ ,LOG={ TAPE} ] Intercomm logging 
[ {DISK} ] device 


[, LPALIB={link-pack-11ib}] Link pack library 
[ {LPALIB }] 


[, P={prefix} ] Intercomm data 
[ {INT }] set high-level 
qualifier 


[,SYS={prefix} ] High-level 
[ {SYS1 }] qualifier for MVS 
system data sets 


[,UNIT={unit }] Device type for 
[ {SYSDA} ] all allocated 
disk data sets 


[ ,VOLSER={volser}] Volser number for 
[ {INTOO1}] all allocated 
disk data sets 


(continued) 
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Intercomm-facility-parameters : 


[ ,AUTOGEN={ YES} ] 
[ {NO }] 


[ ,BACKOUT={YES} ] 
I {NO }] 


[ ,CHKRES={YES} ] 
[ {NO }] 


[, COBOL={NO }] 
[ {YES} ] 


[ ,COBOL2={ YES} ] 
[ {NO }] 


[ ,DATAENT={ YES} ] 
[ {NO }] 
[,DBASE={({DL1 },{INQ})}] 
[ { {TOTAL} {UPD} }] 
[ { {IDMS } }] 
[ { {ADA } }] 
[ { (NONE , INQ) }] 


[ ,DBLIBR={ddname} ] 


[ {SYSLIB} ] 
[ ,DDQ={ YES} ] 
[ {NO }] 
[ ,DFA={ YES} ] 
[ {NO }] 
[ ,DSCT={IXFDSCT2} ] 
[ {IXFDSCT3} ] 
[ {IXFDSCT1} ] 


[ ,DYNLINK={NO }] 
[ {YES}] 


[ ,DYNPOOL={P31}] 
[ {YES} ] 
[ {NO }] 


[ ,DYNVERB={ YES} ] 
[ {NO }] 
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Autogen Feature 


Backout-on-the-Fly 
facility 


Checkpoint/Restart 
facility 


COBOL interface 
routines 


VS COBOL II 
support 


Data Entry 
Feature 


Data Base Support 
Feature 


Data Base library 
ddname 


Dynamic Data Queuing 
Feature 


Dynamic File Allocation 
Feature 


File Handler DSCT 
member-name 


Dynamic Load/Linkedit 
facility 


24- and/or 31-Amode 
ICOMPOOL module (s) 
load at startup 


BTVRBTB (verbs only) 
load at startup 
(continued) 
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[ ,FETABLE={network-table-name} ] 


[ 


[ 
[ 


[ 
[ 


[ 
[ 


[ 
[ 
[ 
[ 
[ 


[ 


[ 
[ 


[ 
[ 


[ 
[ 


[ 
[ 
[ 
[ 
[ 
[ 
[ 


[ 
[ 


[ 
[ 
[ 
[ 
[ 


{BTVRBTB 


, FILEREC={YES} ] 


{NO }] 


, FILSTAT={YES} ] 


{NO }] 


, LPSPA={ YES} ] 


{NO }] 


,LU62={ YES }] 


{ACTIVE }] 
{ PASSIVE} ] 
{NO ] 


,MMU={NO }] 


{YES}] 


/MULTREG={ YES} ] 


{NO }] 


,OVLYSTR={ YES} ] 


{NO }] 


/PL1={OPT}] 


{No }] 


, SAM={ YES} ] 


{No }] 


, SECUR={ESS} ] 


{YES}] 
{No }] 


,STORFCH={NO }] 


{YES} ] 


, TCAM={ YES} ] 


{NO }] 


,UTILITY={ALL 
{NONE 
{utility 


{(utility[,. 
{ (EDIT , OUTPUT) 
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Front End 
Network Table 


File Recovery 
Feature 


File Handler 
Statistics facility 


Link Pack facility 


LU6.2 External 
Feature 


Message Mapping 
Utilities 


Multiregion Facility 
Feature 


Overlay/Non-Overlay 
linkedit structure 


PL/1 interface 
routines 


System Accounting and 
Measurement facility 


Security facility 


Store/Fetch facility 


TCAM Front End 


support 
}] On-line 
}] Utilities 


..)],utility) }] 


}] 
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[, VTAM={ (lutype[,...,lutype])}] VTAM 
[ {YES }] Front End 


[ {NO }] support 


eAUTOGEN 
specifies the Autogen special feature. If AUTOGEN=YES is specified, then 
STORFCH=YES is forced, and MMU=YES is required. See Autogen Facility. The 
default is NO, which indicates that Autogen is not used. 


eBACKOUT 
specifies the Backout-on-the-Fly facility of the File Recovery special feature. If 
BACKOUT=YES is specified, FILEREC=YES, CHKRES=YES and DDQ=YES are 
forced. For new installations, the THREDLOG DDQ data set is created. See the 
File Recovery Users Guide. The default is NO. 


eCHKRES 
specifies the Checkpoint and Automated Message Restart facilities and for new 
installations, creation of a CHEKPTFL data set. In addition, the Automated 
Restart facility data set STRTUPSW is allocated and initialized. See the 
Operating Reference Manual. The default is NO, unless Backout-on-the-Fly 
(BACKOUT=YES), or the File Recovery special feature (FILEREC=YES) or data 
base updating is specified, in which case CHKRES=YES is forced. 


COBOL 
specifies OS/VS (ANS) COBOL interface support for user application programs 
executing under Intercomm. See the Operating Reference Manual. If 
COBOL=YES, RECOBOL=YES is forced for the ICOMLINK generation. See also 
COBOL2. The default is YES. 


eCOBOL2 

specifies VS COBOL II interface support. If YES is coded, but COBOL=NO 
(implying only VS COBOL Il support), then for ICOMLINK (see job 80), 
RECOBOLENO is generated and COBOL=YES is forced. If YES is coded and 
COBOL=YES (implying both OS/VS or ANS COBOL and VS COBOL II support), 
then for ICOMLINK, RECOBOL=YES is forced. If YES is coded, basic VS 
COBOL II installation steps are also generated (see also COBOL Programmers 
Guide). The default is NO. 


eDATAENT 
specifies the Data Entry special feature for ICOMLINK generation. See the Data 
Entry Installation Guide. If DATAENT=YES, STORFCH=YES is forced. The 
default is NO. 
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eDBASE 
specifies a Data Base Management System special feature is in use for 
ICOMLINK generation, as follows: 


Updates permitted. The Checkpoint/Restart facility 
must be included in the system (see CHKRES). 

UPD recommended only for TOTAL. For others, use 
INQ even though updates are done online. 


See DBMS Users Guide. The default is (NONE,INQ); that is, no DBMS is in use. 


DBLIBR 


eDDQ 


eDFA 


DSCT 


specifies the ddname of the library or concatenated library group in which the 
database modules reside for the ICOMLINK generation. The default ddname is 
SYSLIB. 


specifies the Dynamic Data Queuing special feature and for new installations, 
generation of DDQ data sets and the Queue Control File and the Space Control 
File. DDQ=YES is forced if a Multiregion Intercomm system is in use or 
BACKOUT=YES. See Dynamic Data Queuing Facility. The default is NO. 


specifies whether the Dynamic File Allocation special feature is used, requiring 
assembly and linkedit of the support module, and addition of an INCLUDE for the 
module in the Intercomm linkedit. See Dynamic File Allocation. Code YES if 
desired, the default is NO. 


specifies the member name of the particular File Handler Data Set Control Table 
module to be assembled and linked in the File Handler assembly job, based on 
the number of files to be processed during Intercomm execution. See the 
description of the IXFDSCTA macro in Basic System Macros. Code one of the 
following: 


[Modules | NumberofFilestobe Monitored 
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DYNLINK 

specifies the Dynamic Linkedit facility and generation of DD statements for the 
DYNLLIB and DYNLPRNT data sets in the Intercomm execution JCL (see Job 
90). DYNLINK=YES also forces the ICOMLINK parameter DYNLOAD=YES: set 
DYNLOAD=NO on the generated ICOMLINK deck (see Job 80) if no dynamically 
loaded user subsystems or subroutines are defined (and delete DYNLLIB and 
DYNLPRNT DD statements from the execution JCL - see job 90). See the 
Operating Reference Manual. The default is YES (required to use the LOC 
option on the SCTL system control command). 


eDYNPOOL 

specifies the Dynamically Loaded Intercomm Pools facility, wherein 24-Amode 
and/or 31-Amode Intercomm pools modules are loaded at startup. See the 
Operating Reference Manual. The default is NO (include NEWPOOLS in the 
Intercomm linkedit, and 31-Amode pools not used). Code YES for loading both 
pools types, code P31 to load only 31-Amode pools (NEWPOOLS is resident). 
Note that loading of 31-Amode pools also requires coding of a SPALIST macro 
parameter as described in the Planning Guide. 


eDYNVERB 
specifies whether the Front End Verb Table is to be loaded at startup. See the 
Operating Reference Manual. The default is NO (include BTVRBTB in the 
Intercomm linkedit - see FETABLE). 


eFETABLE 

specifies the name of the Front End Network Table (BTAM, TCAM and/or VTAM) 
to reassemble and linkedit in the Intercomm installation job stream, if separately 
assembled from the Front End Verb Table (BTVRBTB) which is automatically 
assembled. See the Operating Reference Manual and applicable Terminal 
Support Guides. The default is BTVRBTB which indicates that the Front End 
Verb and Network Tables have been coded in one module (not valid if 
DYNVERB=YES). 


eFILEREC 
. specifies the File Recovery special feature. See the File Recovery Users Guide. 
FILEREC=YES forces CHKRES=YES. The default is NO, unless the Backout- 
on-the-Fly facility is specified (BACKOUT=YES), in which case FILEREC=YES is 
forced. 


eFILSTAT 


specifies the File Handler Statistics Report facility. See the Operating Reference 
Manual. The default is NO. 
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GEN 

specifies the type of Intercomm installation being done. Code as NEW for first- 
time installation. The default is OLD indicating a reinstallation of an existing 
Intercomm system. Specifying NEW will result in production of JCL for allocation 
of various data sets such as Map Definition Files for MMU, DDQ data sets, the 
SECURITY data set for Extended Security, the CHEKPTFL data set for 
Checkpoint/Restore, the STATFILE data set for File Handler Statistics, 
Store/Fetch data sets, etc. In either case, the JCL is generated for loading of the 
RCTOOO data set used by the Output Utility (which is used by the Intercomm 
system itself), assembly of various modules from the SYMREL data set and the 
creation (if GEN=NEW) and assembly (from SYMREL or SYMUSR as 
appropriate) of tables for various facilities. 


JOBACCT 
specifies accounting information that may be required on the JOB statements to 
be generated and is installation-dependent. Code in parentheses if imbedded 
commas are present. The default is ICOM. Due to the number of assembly 
steps in some of the jobs, the number of print lines subparameter should be at 
least 40 (40,000 lines). 


JOBCLAS 
specifies the MVS job class governing MVS selection of the generated jobs for 


execution. The default is A. 


JOBNAME 
specifies the jobname prefix for all generated JOB statements. Code as one to 


six alphanumeric characters. The default is ICMGEN. 


JOBPGNM 
specifies the programmer name field for all generated JOB statements and is 


installation-dependent. Code in quotes if imbedded blanks are present. The 
default is GENICOM. 


LOG 
specifies the type of device to be used for Intercomm logging and governs the 
type of log data set JCL that will be generated for the Intercomm execution job. 
Code as DISK or TAPE. If DISK is coded, JCL is generated to allocate disk data 
sets to utilize the Intercomm sequential output disk file flip/flop facility described in 
the Operating Reference Manual. The default is DISK. 


LPALIB 
specifies the name of the library designated as the System Link Pack library to be 
used for Multiregion, ESS, and/or Link Pack installation. See also the SYS 
parameter. The default is LPALIB. 


eLPSPA 
specifies whether the Intercomm Link Pack Facility is used and if YES, causes 
installation JCL to be generated, the LPSPALIB DD statement to be included in 
the generated Intercomm execution JCL, and modification of the Intercomm 


linkedit. See the Operating Reference Manual. The default is NO. 
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eLU62 


eMMU 


specifies whether the LU6.2 External Feature is being used and if YES or 
PASSIVE (for basic support), or if ACTIVE (for extended/combined support) 
causes the modules involved to be assembled and linked, and included in the 
Intercomm linkedit. See SNA LU6.2 Support Guide. The default is NO. 


specifies whether Message Mapping Utilities are to be used, and if YES, 
generates assembly of the MMUVTBL table. If GEN=NEW, applicable MMU data 
sets are created. See Message Mapping Utilities. MMU=YES is required if 
AUTOGEN=YES is coded. MMU=YES forces STORFCH=YES. The default is 
YES. 


eMULTREG 


specifies the Multiregion Facility special feature and causes creation for a new 
user of all applicable control and satellite region data sets, in addition to 
ICOMLINK decks for a control and two satellite regions, and assembly and 
linkedit of tables MRMCT and PMIRDTOO. If YES is coded, the MRSVC or IISVC 
global and the MULTREG global must be preset in SETGLOBE. See Multiregion 
Support Facility. MULTREG=YES forces DDQ=YES. The default is NO. 


OVLYSTR 


PL1 


eSAM 


specifies the use of an overlay structure in the Intercomm linkedit for certain 
Intercomm and/or user modules. OVLYSTR=YES forces the ICOMLINK 
parameters TRANS=YES and ASYNCH=YES. The default is NO 
(recommended). 


specifies the high-level qualifier for all Intercomm data set names, and must be 
the same as that used for the RXINSTAL job to allocate Intercomm libraries. Do 
not code in quotes if multiple qualifiers are used. The default is INT. 


specifies the use of PL/1 interface routines for user application programs 
executing under Intercomm. If OPT (or YES) is coded, causes assembly and 
linkedit of modules PREPLI and PMIPL1, and copying of PL/1 source members to 
SYMPL1. For new users, SYMPL1 is also allocated. See the PL/1 Programmers 
Guide and the Operating Reference Manual. The default is NO, indicating that 
PL/1 programs will not be used. 


specifies linkedit of the System Accounting and Measurement facility modules for 
the ICOMLINK generation. See the Operating Reference Manual. The default is 
NO. 
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eSECUR 
specifies the security functions to be used. ESS specifies the Extended Security 
System special feature and causes the linkedit of the appropriate Intercomm 
SVC. For new installations, JCL for assembly and linkedit of the link pack module 
SECVECT, as well as the creation of the SECURITY data set is generated. See 
Extended Security System. YES specifies Basic Security functions are in use; see 


the Operating Reference Manual. The default is NO. 


eSTORFCH 
specifies the Store/Fetch Facility and for a new installation, causes creation of the 
Store/Fetch data sets. See Store/Fetch Facility, STORFCH=YES is forced if 
AUTOGEN=YES, MMU=YES, or DATAENT=YES is coded. The default is YES. 


SYS 
specifies the high-level qualifier for various MVS system data set names. Do not 
code in quotes if multiple qualifiers are used. The default is SYS1. 

eTCAM 
specifies whether a TCAM Front End is desired. Code YES if the Intercomm 
Extended TC:\M support via the BTAM Front End (and GFE special feature) is 
used. See TCAM Support Users Guide. The default is NO. 

UNIT 
specifies the disk device type used for all Intercomm data set allocation. See also 
the description of RXINSTAL job in Chapter 2. The default is SYSDA. 

eUTILITY 
specifies use of certain on-line application oriented utilities. Code ALL if all 
utilities in the following list are in use. Code NONE if no utilities are to be used. If 
selected utilities only are to be used, code in a parameter sublist, as follows: 

PAGE CRT Page Browsing special feature. 

See the Operating Reference Manual and Utilities Users Guide. When PAGE (or 
ALL) is coded, see Page Facility for additional installation requirements. For 
Intercomm system command processing, EDIT and OUTPUT are required. The 
default is (EDIT,OUTPUT). 

VOLSER 


specifies the volume serial number of the dedicated pack used for the Intercomm 
installation and all initial Intercomm data set and library allocations (see 
RXINSTAL job in Chapter 2). The default is INTO01. 
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eVTAM 

specifies whether a VTAM Front End is desired, and if so, causes the assembly 
and linkedit of various VTAM Front End modules, and for a new installation, the 
allocation of the VTAMQ disk queue data set. If VTAM is used, code a list of all 
logical unit type codes to be used; valid logical unit type codes are given in the 
description of the VTLSB macro LUTYPE parameter in the SNA Terminal Support 
Guide. Add ICOM or CICS if LU62 is not coded as NO. YES may be coded (for 
all types) instead of a list. If this parameter is coded, the VTAM global in 
SETGLOBE must be preset to 1. The default is NO. 


Chapter 5 


INSTALLATION JCL 


5.1 EXECUTING THE GENERATED JCL 


The JCL job stream produced by the assembly of the ICOMGEN macro consists 
of 40 separate jobs, some of which are conditionally produced. The jobs are numbered 
from job ICMGENO2 to job ICMGEN62 plus job ICMGEN790 to install the Intercomm Link 
Pack Facility, if specified, and job ICMGEN/78 to allocate a linkedit deck (control 
statements) library called SYMINCL, job ICMGEN80 to produce the linkedit deck(s) 
(assemble ICOMLINK), job ICMGEN85 to linkedit Intercomm, and job ICMGENSO to 
generate a sample job stream procedure for Intercomm execution JCL. Do not attempt 
to run the jobs concurrently as several are dependent on previous jobs executing 
successfully. 


The following pages list the purpose of, and affected Intercomm elements for, 
each job. Generation of the job and/or individual steps within the job is dependent on the 
individual installation environment and may require modification as described under each 
job. In addition, if PROCLIB or ROUTE statements are required for the user installation, 
add those statements to each job as necessary. Also, add MSGCLASS and/or NOTIFY 
parameters to the JOB statements if the jobs are submitted under TSO (ISPF) or a 
similar text editor. 


Note that for Release 11, the individual Intercomm load modules on the MODREL 
release library were assembled using the HLASM (ASMASQ0) executing on an ESA 4.3 
operating system with DFSMS 1.2, and then link edited using the DFSMS binder/linkage 
editor with the options NCAL, LIST, LET, MAP, NORENT, and XREF. The generated 
installation job stream includes steps to reassemble modules affected by different MVS, 
VTAM, DFSMS, etc. releases. 


The generated jobs should be kept for future reference on modules to 
reassemble should an upgrade to the Front End access method or the entire Operating 
System be made at your site, or if global table settings are changed. Whenever changes 
are made to Intercomm tables to add, delete, or modify entries, those tables must also 
be reassembled and relinked with the Intercomm load module(s). 


For each job, the section title provides the primary job function and whether it 
may be generated for a new user only (NEW), an existing user (OLD), or both 
(NEW/OLD). Before submitting a job, read the entire description. For some jobs, 
system limits on the number of steps per job may require breaking the job into smaller 
job streams. 


NOTE: some modules are listed under more than one job due to their 
reference to multiple system functions. 
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5.2 JOB02-COPY TABLES, ALLOCATE MDF LIBRARIES (NEW) 


Job ICMGENO2, produced only if doing a new installation, copies supplied 
sample Intercomm tables from SYMREL to SYMUSR. The tables are FENETWRK 
(sample BTAM Front End Network Table), PMIBROAD, PMIDEVTB, PMISTATB, 
USRBTVRB (for BIVRBTB assembly), USRSUBS (for REENTSBS assembly), 
USRVERBS (for PMIVERBS assembly), NEWPOOLS, IC31PL0O0, PMIFILET, 
BTAMSCTS (if a BTAM Front End used), and MMUVTBL (if MMU used). The tables are 
assembled in job 34. If MMU is included in the system, the SYMMDF and MODMDF 
data sets (map definition files) are also allocated. 


lf a VTAM Front End is being installed, the module VTSAMP supplied on 
SYMREL and described in the SNA Terminal Support Guide should be used as a table 
base for the FENETWRK table. VTSAMP may be added to (if BTAM also used), or 
modified, instead of using the supplied FENETWRK module. To use VTSAMP, scratch 
FENETWRK from SYMUSR, then copy VISAMP to SYMUSR and rename it to the value 
coded for the FETABLE parameter when the ICOMGEN macro was assembled. 


In addition, modules INTSPA, CRSPA, SR1SPA, SR2SPA, USRSCTS, 
USRSCTS1, and USRSCTS2 are also copied. These tables are assembled in job 38. At 
assembly time, USRSCTS is copied into INTSCT or if a Multiregion System is being 
generated, USRSCTS is copied by CRSCT, USRSCTS1 is copied by SR1SCT, and 
USRSCTS2 is copied by SR2SCT. 


Before proceeding further with the installation process, the tables should be 
modified to installation needs in consultation with an Intercomm System Engineer. For 


SR1SPA and SR2SPA, see also Multiregion Support Facility on coding of SPALIST 
parameters for a Multiregion system. For PMIFILET, delete the GENFTBLE entries for 
DESO00 (if the CHANGE/DISPLAY Utility will not be used), VRBOOO (if the EDIT Utility 
will only be used for Intercomm verbs), and SECOO0 (if the Basic Security feature is not 
used - see SECUR parameter description for the ICOMGEN macro). 


5-2 


J 


Chapter 5 


f/* 
//[* 
//* 
ee 
//* 


/ /ICMGENO2 


COPY FENETWRK, PMIBROAD, PMIDEVTB, PMISTATB, 
USRBTVRB, USRSUBS, USRVERBS, MMUVTBL, PMIFILET 
NEWPOOLS, IC31PL00, 
CRSPA, SRISPA, SR2SPA, USRSCTS1, USRSCTS2 


//SYSPRINT 
//SYSUT1 
//SYSUT2 
//SYSIN 


JOB ICOM, GENICOM,CLASS=A 


//* AND BTAMSCTS 
//* TO SYMUSR 

//* 

//S10 EXEC PGM=IEBUPDTE 


DD SYSOUT=A 


DD DSN=INT.SYMREL,DISP=OLD 
DD DSN=INT.SYMUSR ,DISP=OLD 


DD * 


DCB= (DSORG=PO , RECFM=FB , BLKSIZE=6160 , LRECL=80) 


DCB= (DSORG=PO0 , RECFM=U , BLKSIZE=6160) 


./ REPRO NAME=FENETWRK 

./ REPRO NAME=PMIBROAD 

./ REPRO NAME=PMIDEVTB 

./ REPRO NAME=USRBTVRB 

./ REPRO =USRSUBS 

./ REPRO NAME=USRVERBS 

./ REPRO NAME=MMUVTBL 

./ REPRO NAME‘:PMIFILET 

./ REPRO NAME=NEWPOOLS 

./ REPRO NAME=IC31PLO00 

./ REPRO NAME=INTSPA 

./ REPRO NAME=USRSCTS 

./ REPRO NAME=CRSPA 

./ REPRO NAME=SR1SPA 

./ REPRO NAME=SR2SPA 

./ REPRO NAME=USRSCTS1 

./ REPRO NAME=USRSCTS2 

./ REPRO NAME=BTAMSCTS 

./ ENDUP 

/* 

//* 

//* ALLOCATE INTERCOMM MMU LIBRARIES 
//* 

//S20 EXEC PGM=IEFBR14 

//SMDF DD DSN=INT.SYMMDF,DISP=(,CATLG) , 
// SPACE=(CYL, (2,2,25)), 

// UNIT=SYSDA , VOL=SER=INTOO1, 
// 

//* 

//MMDF DD DSN=INT.MODMDF,DISP=(,CATLG) , 
// SPACE= (CYL, (2,2,25)), 

// UNIT=SYSDA ,VOL=SER=INTO0O01, 
// 

// 


(FIRST TIME ONLY) 


Installation JCL 


INTSPA, USRSCTS 
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9.3 JOB 04-ALLOCATE DISK LOG DATA SETS (NEW/OLD) 


Job ICMGEN04, produced only if Intercomm logging is to be done to a disk 
device, allocates the log data set (INTERLOG) and its companion (INTERLOC) and thus 
implements the sequential output disk file flip/flop facility as described in the Operating 
Reference Manual, Chapter 6. If installing a Multiregion Intercomm system, log data sets 
will be allocated for the control region and two satellite regions, and will be named 
INT.region-id.INTERLOG and INT.region-id.INTERLOC where region-id will be CR, SR1 
and SR2. Data set names for a single region Intercomm system will be INT.INTERLOG 
and INT.INTERLOC. If the ICOMGEN parameter P is coded, the specified value will be 
substituted for the default data set prefix value INT. 


The user may change the generated values for BLKSIZE (4100), LRECL (4096) 
and NCP (8 - must be the same as the value coded for the LGNUM parameter on the 
SPALIST macro), however the same values must be coded on the INTERLOC 
companion data set as are coded on the primary INTERLOG data set. These changes 
must then also be made on all the INTERLOG and INTERLOC DD statements and for 
the block size on LOGDISK and RESTRTLG (if message restart is used) in the 
Intercomm execution JCL generated by job 90. The number'of allocated cylinders may 
be changed, however a secondary extent may not be specified when using the flip/flop 
facility. This restriction is due to requirements for the ICOMFEOF utility to recover the 
log disk data set after a system (hardware) crash. See the Operating Reference Manual, 
Chapter 12. 


Full details on the Intercomm logging facility are provided in Chapter 9 of the 
Operating Reference Manual. 


For Single Region: 


/ /ICMGENO4 JOB ICOM, GENICOM, CLASS=A 


ALLOCATE INTERLOG, INTERLOC FOR DISK LOGGING 


EXEC PGM=IEFBR14 
DSN=INT . INTERLOG, 
DISP= (NEW, CATLG,CATLG) , 
DCB= (DSORG=PS , BLKSIZE=4100 , RECFM=VB, 
LRECL=4096 ,NCP=8 ,OPTCD=C) , 
VOL=SER=INT001,UNIT=SYSDA, 
SPACE= (CYL, (5) ,RLSE) 


DSN=INT. INTERLOC, 
DISP= (NEW, CATLG,CATLG) , 

DCB= (DSORG=PS , BLKSIZE=4100 , RECFM=VB, 
LRECL=4096 ,NCP=8 , OPTCD=C) , 
VOL=SER=INT001,UNIT=SYSDA, 
SPACE=(CYL, (5) ,RLSE) 
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For Multiregion: 


/ /ICMGENO4 
//* 


//* ALLOCATE 


//* 

//S10 

/ /INTERLOG 
// 

// 

// 

// 

// 

//* 
//INTERLOC 
// 

// 

// 

// 

// 

//* 
//SRLINTLG 
// 

// 

rie & 

// 

// 

//* 
//SRLINTLC 


/ /SR2ZINTLG 
// 
// 
// 
// 
// 
/[* 
/ / SRZINTLC 
// 
// 
// 
// 
// 
// 


JOB ICOM, GENICOM, CLASS=A 


INTERLOG, INTERLOC FOR DISK LOGGING 

EXEC PGM=IEFBR14 

DD DSN=INT.CR.INTERLOG, 

' DISP=(NEW,CATLG,CATLG) , 
DCB= (DSORG=PS , BLKSIZE=4100 , RECFM=VB, 
LRECL=4096 ,NCP=8,OPTCD=C) , 
VOL=SER=INT001,UNIT=SYSDA, 
SPACE= (CYL, (5) ,RLSE) 


DSN=INT.CR. INTERLOC, 
DISP=(NEW,CATLG,CATLG) , 

DCB= (DSORG=PS , BLKSIZE=4100 , RECFM=VB, 
LRECL=4096,NCP=8 ,OPTCD=C) , 
VOL=SER=INTO01,UNIT=SYSDA, 

SPACE= (CYL, (5) ,RLSE) 


‘DSN=INT.SR1. INTERLOG, 

DISP= (NEW, CATLG,CATLG) , 

DCB= (DSORG=PS , BLKSIZE=4100 , RECFM=VB, 
LRECL=4096 ,NCP=8,OPTCD=C) , 
VOL=SER=INTO01,UNIT=SYSDA, 
SPACE= (CYL, (5) ,RLSE) 


DSN=INT.SR1.INTERLOC, 
DISP=(NEW,CATLG,CATLG) , 

DCB= (DSORG=PS , BLKSIZE=4100 , RECFM=VB, 
LRECL=4096 ,NCP=8,OPTCD=C) , 
VOL=SER=INT001 ,UNIT=SYSDA, 
SPACE= (CYL, (5) ,RLSE) 


DSN=INT.SR2.INTERLOG, 
DISP=(NEW,CATLG,CATLG) , 

DCB= (DSORG=PS , BLKSIZE=4100 , RECFM=VB, 
LRECL=4096 ,NCP=8,OPTCD=C) , 
VOL=SER=INTO01,UNIT=SYSDA, 
SPACE= (CYL, (5) , RLSE) 


DSN=INT.SR2.INTERLOC, 

DISP= (NEW, CATLG,CATLG) , 

DCB= (DSORG=PS , BLKSIZE=4100 , RECFM=VB, 
LRECL=4096 ,NCP=8 ,OPTCD=C) , 
VOL=SER=INTO001,UNIT=SYSDA, 

SPACE= (CYL, (5) , RLSE) 
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5.4 JOB 06 - BMN BACK-OFF INSTALLATION (OLD only) 


Job ICMGENO6, which is produced only if the &BMNOLD global in SETGLOBE is 
set to 1 and this is a reinstallation for an existing user, causes an update to SYMLIB to 
back off to the old Release 9 2-byte BMN number in the MSGHDR Dsect for the 
Intercomm message header, and in COBOL and PL/1 copy members which reference 
the message header. If the ICOMGEN parameter P is coded, the specified value will be 
substituted for the default data set prefix value INT in the update step. In addition, steps 
to reassemble and link modules which reference the BMN number are generated for 
modules which are not automatically reassembled in other jobs: CONVERSE, 
FINTUNER, FORMGEN, LOGANE15, LOGPRINT, LOGPROC, MAPOUT (if MMU used), 
PAGEMSG (if Page Facility used), and QUEUEMOD (if a BTAM Front End is used). 


Modules referencing the BMN number which are automatically assembled in 
other jobs are: BSEGMOD (if DDQ global set to 1 in SETENV), BTSEARCH (if BTAM 
used), DDQMOD (if DDQ used), FECMD, FEMSG, INITLU6 (if extended LU6.2 used), 
MRINPUT (if Multiregion used), PMITEST, SYCT400, TALLY, VTCDM62 and 
VTLUDME2 (if extended LU6.2 used) or VTLUDM6 (if basic LU6.2 used), VTRECVE and 
VTSEND (if a VTAM Front End is used), VTO1MOD (if BTAM not used), and WITOMOD. 


//ICMGENO6 JOB ICOM, GENICOM, CLASS=A | 

//* 

//* APPLY BMN BACKOFF CHANGES 

//* 

//s5 EXEC PGM=IEBUPDTE 

//SYSPRINT DD SYSOUT=A 

//SYSUT1 DD DSN=INT.SYMREL,DISP=SHR 

//SYSUT2 DD DSN=INT.SYMLIB,DISP=OLD 

//SYSIN DD DSN=INT.SYMREL (CMSGHBMN) , DISP=SHR 

//* 

//* ASSEMBLE/LINK AFFECTED MODULES 

//* NOT ASSEMBLED IN OTHER JOBS 

//* 

//S5 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=CONVERSE , LMOD=CONVERSE 
//ASM.SYSIN DD DSN=&P. .SYMREL (SNAME) , DISP=SHR 

//S10 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=FINTUNER, LMOD=FINTUNER 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

//S15 EXEC ASMPCL, P='INT' ,Q=LIB, NAME=FORMGEN , LMOD=FORMGEN 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

//S20 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=LOGANE15 , LMOD=LOGANE15 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

//S25 EXEC ASMPCL, P='INT' ,Q=LIB,NAME=LOGPRINT , LMOD=LOGPRINT 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

//S830 EXEC ASMPCL, P='INT' ,Q=LIB, NAME=LOGPROC , LMOD=LOGPROC 
//ASM.SYSIN DD DSN=&P. .SYMREL (&NAME) , DISP=SHR 

//S35 EXEC ASMPCL,P='INT' ,Q=LIB, NAME=MAPOUT , LMOD=MAPOUT 
//ASM.SYSIN DD DSN=&P..SYMREL (&NAME) , DISP=SHR 

//S40 EXEC ASMPCL, P='INT' ,Q=LIB, NAME=PAGEMSG , LMOD=PAGEMSG 
//ASM.SYSIN DD DSN=&P..SYMREL (&NAME) , DISP=SHR 

//S45 EXEC ASMPCL, P='INT' ,Q=LIB, NAME=QUEUEMOD , LMOD=QUEUEMOD 
//ASM.SYSIN DD DSN=&P. .SYMREL(S&NAME) , DISP=SHR 

// 
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5.5 JOB 08 - ASSEMBLIES FOR EXTENDED TCAM (NEW/OLD) 


Job ICMGENO8, produced only if installing an Extended TCAM system, causes 
the reassembly and relink of modules TCAMINTF and TCAMASYN to incorporate TCAM 
macros. See the TCAM Terminal Support Guide. 


NOTE: these modules should also be reassembled for every future upgrade in a 
TCAM release. 


/ /ICMGENO8 JOB ICOM, GENICOM, CLASS=A 
EXTENDED TCAM MODULES 


//S10 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=TCAMINTF , LMOD=TCAMINTF 
//ASM.SYSIN DD DSN=&P..SYMREL (&NAME) ,DISP=SHR 


//S20 EXEC ASMPCL, P='INT' ,Q=LIB,NAME=TCAMASYN , LMOD=TCAMASYN 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) , DISP=SHR 


CREATE MCP INTERFACE DISK Q DATA SETS (SEPARATE JOB) 


5-7 


Chapter 5 Installation JCL 


9.6 JOB 10-ASSEMBLE COMMON FRONT END MODULES (NEW/OLD) 


Job ICMGEN10, which is always produced, causes the reassembly and relink of 
the Front End modules BLHSTRC, FECMD, FEMSG, TALLY, SYSCNTL, CLOSDWN3, 
FEWHOI, PMIEXTRM, WTOMOD, and OUT3270 which are common to the BTAM and 
VTAM Front Ends. Note that the module INTVRBOO (required for all Front End types) 
does not contain any global or operating system (TP access method) dependent code 
and does not need reassembly. See the BTAM and SNA Terminal Support Guides, as 
appropriate. 


NOTE: all modules must be reassembled if VTAM is installed at a later date, 
after setting &VTAM to 1 in SETGLOBE. If BTAM is no longer used, set 
&BTAM to 0 in SETGLOBE and rerun this job. 


//ICMGEN10 JOB ICOM, GENICOM, CLASS=A 
//* 

//* COMMON FRONT END MODULES 

//* 

//S10 EXEC ASMPCL, P='INT' ,Q=LIB, NAME=BLHSTRC , LMOD=BLHSTRC 
//ASM.SYSIN DD DSN=6P..SYMREL(&NAME) , DISP=SHR 

//S20 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=FECMD , LMOD=FECMD 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

//S30 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=FEMSG , LMOD=FEMSG 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

//S40 EXEC ASMPCL, P='INT' ,Q=LIB, NAME=TALLY , LMOD=TALLY 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) ,DISP=SHR 

//S50 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=SYSCNTL, LMOD=SYSCNTL 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

//S60 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=CLOSDWN3 , LMOD=CLOSDWN3 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

//S70 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=FEWHOIL , LMOD=FEWHOI 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

//S80 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=PMIEXTRM, LMOD=PMIEXTRM 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

//S90 EXEC ASMPCL, P='INT' ,Q=LIB,NAME=0UT3270 , LMOD=0UT3270 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) ,DISP=SHR 

//S100 EXEC ASMPCL, P='INT' ,Q=LIB, NAME=WTOMOD , LMOD=WTOMOD 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

// 
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5.7 JOB 12-BTAM FRONT END ASSEMBLIES (NEW/OLD) 


Job ICMGEN12, produced only if installing a BIAM Front End (requires &BTAM 
global set to 1 in SETGLOBE), causes the reassembly and relink of the common 
BTAM/TCAM Front End modules (see the BTAM Terminal Support Guide), including 
BSTAT2 if the system separator (SEPCHAR in SETENV) is specified as other than the 
default of a comma (‘6B’). In addition, the following modules are reassembled and 
relinked in this job only if related special device support is specified for the system via 
SETENV: 


e ERRSTATS - only if IBM2740 support included 

e GFEINTFC - only if using the Generalized Front End, and Local 
3270 support included 

e BDIAL - only if start/stop dialup support included 

e BSCDIAL - only if bisync dialup CPU support included 

» BSCLEASE - only if bisync leased CPU support included 


e PMI3735S,0OUT3735 - only if IBM3735 support included 


e PMI7770S - only if IBM7770 support included 

e CNTO1MOD - only if CNT1050 and backspace support (BACKSPC) 
included 

e PMI2741 - only if IBM2741 support included 

e SIMTTY - only if special NCIC support (SIMTTY) used 


NOTE: if an upgrade in BTAM or BTAM/SP occurs, all modules in the generated 
job stream must be reassembled. 


5-9 


Chapter 5 


//ICMGEN12 
//* 
//* 
//* 
//* 
//* 
//* 
//810 
//ASM. 
//S20 
//ASM. 
//$30 
//ASM. 
//S40 
//ASM. 
//S50 
//ASM.SYSIN 
//S60 EXEC 
//ASM.SYSIN 
//S70 EXEC 
//ASM. SYSIN 
//S80 EXEC 
//ASM.SYSIN 
//S90 EXEC 
//ASM. SYSIN 
//* 
//* 
fi] * 
//S100 EXEC 
//ASM. SYSIN 
//S110 EXEC 
//ASM. SYSIN 
//S120 EXEC 
/ /ASM. SYSIN 
//S130 EXEC 
//ASM. SYSIN 
//S140 EXEC 
//ASM.SYSIN 
//S150 EXEC 
//ASM.SYSIN 
//S160 EXEC 
//ASM.SYSIN 
//S170 EXEC 
//ASM.SYSIN 
//S180 EXEC 
/ /ASM. SYSIN 
//8190 EXEC 
//ASM. SYSIN 
//S200 EXEC 
//ASM. SYSIN 
// 


EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 


JOB ICOM, GENICOM, CLASS=A 


BTAM FRONT END 


REQUIRED MODULES 


ASMPCL, P='INT' ,Q=LIB , NAME=BLHIN , LMOD=BLHIN 

DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT!' ,Q=LIB, NAME=BLHOT , LMOD=BLHOT 

DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=BMHO000 , LMOD=BMHO00 

DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=BSTAT2 , LMOD=BSTAT2 

DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

ASMPCL , P='INT' ,Q=LIB, NAME=BTAMLINE , LMOD=BTAMLINE 
DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL , P='INT' ,Q=LIB , NAME=BTSEARCH , LMOD=BTSEARCH 
DD DSN=&P. .SYMREL(SNAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=BTVERIFY , LMOD=BTVERIFY 
DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=TPUMSG , LMOD=TPUMSG 

DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL , P='INT' ,Q=LIB, NAME=BLHTRACE , LMOD=BLHTRACE 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 


OPTIONAL MODULES 


ASMPCL, P='INT' ,Q=LIB, NAME=ERRSTATS , LMOD=ERRSTATS 
DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=GFEINTFC , LMOD=GFEINTFC 
DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=BDIAL , LMOD=BDIAL 

DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=BSCDIAL, LMOD=BSCDIAL 
DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=BSCLEASE , LMOD=BSCLEASE 
DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=PMI3735S , LMOD=PMI3735S 
DD DSN=&P. . SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=0UT3735 , LMOD=0UT3735 
DD DSN=&P. .SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=PMI7770S , LMOD=PMI7770S 
DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

ASMPCL , P='INT' ,Q=LIB ,NAME=CNTO1MOD , LMOD=CNTO1MOD 
DD DSN=&P. . SYMREL(SNAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=PMI2741 , LMOD=PMI2741 
DD DSN=&P. . SYMREL(SNAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=SIMTTY , LMOD=SIMTTY 

DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 
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5.8 JOB 14 - VTAM FRONT END ASSEMBLIES (NEW/OLD) 

Job ICMGEN14, produced only if installing a VTAM Front End (requires &VTAM 
global set to 1 in SETGLOBE), causes the reassembly and relink of the various VTAM 
Front End modules (see the SNA Terminal Support Guide). If installing a BTAM Front 
End as well, module VTO01MOD (CPU console support) is not reassembled because the 


CPU console is supported via the BTAM Front End module CNTO1MOD (see job 12). 


NOTE: 


/ /ICMGEN14 


//* 
//* 
//* 
//810 


//ASM. 


//820 


//ASM. 


//830 


//ASM. 


//840 


//ASM. 


//s850 


//ASM. 


//860 


//ASM. 


//870 


//ASM. 


//S80 


//ASM. 


//$890 


//ASM. 


EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 


//S100 EXEC 


//ASM. 


SYSIN 


//S110 EXEC 


//ASM. 


SYSIN 


//S120 EXEC 


//ASM. 


SYSIN 


//S8130 EXEC 


//ASM. 


SYSIN 


//S140 EXEC 


//ASM. 


SYSIN 


//S150 EXEC 


//ASM. 


SYSIN 


//S160 EXEC 


//ASM. 


SYSIN 


//S170 EXEC 


//ASM. 


SYSIN 


//S180 EXEC 


//ASM. 


// 


SYSIN 


after a VTAM upgrade, execute this job again, reassemble the Front End 
Network Table, and the LU6.2 support modules (see job 15) if used. 


JOB ICOM, GENICOM, CLASS=A 


VTAM FRONT END 


ASMPCL , P='INT' ,Q=LIB , NAME=VTSTART , LMOD=VTSTART 
DD DSN=&P. .SYMREL (&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=VTRECVE , LMOD=VTRECVE 
DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT! ,Q=LIB ,NAME=VTSEND , LMOD=VTSEND 

DD DSN=&P. . SYMREL (&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=VTRESP , LMOD=VTRESP 

DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT! ,Q=LIB, NAME=VTTRACEV , LMOD=VTTRACEV 
DD DSN=&P. .SYMREL(SNAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=VTEXITS , LMOD=VTEXITS 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=VTLUCMD , LMOD=VTLUCMD 
DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=VTQMOD , LMOD=VTQMOD 

DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=VTVREERR , LMOD=VIVREERR 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=VTERRMOD , LMOD=VTERRMOD 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=VTSQRSYN , LMOD=VTSORSYN 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=VTLUSCAN , LMOD=VTLUSCAN 
DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=VTAUTOUP , LMOD=VTAUTOUP 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=VTAMSTAT , LMOD=VTAMSTAT 
DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=VTO1MOD , LMOD=VT01MOD 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=VTCDM1 , LMOD=VTCDM1 

DD DSN=&P. .SYMREL(SNAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=VTCDM2 , LMOD=VTCDM2 

DD DSN=&P..SYMREL(SNAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=VTLUDM2 , LMOD=VTLUDM2 
DD DSN=6P..SYMREL(&NAME) , DISP=SHR 
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5.9 JOB 15-LU6.2 EXTERNAL FEATURE INSTALLATION (NEW/OLD) 

Job ICMGEN15, produced only if installing the LU6.2 External Feature (requires 
&VTAM global set to 1 in SETGLOBE), causes the reassembly and relink of the 
appropriate (depending on whether Passive/Basic or Active/Extended Mode specified) 
support modules (see the SNA LU6.2 Support Guide). 


NOTE: these modules should be reassembled after a VTAM upgrade. 


For Passive/Basic Mode installation: 


//ICMGEN15 JOB ICOM, GENICOM, CLASS=A 
//* 

//* LU6.2 EXTERNAL FEATURE 

//* ASSEMBLE AND LINK LU6.2 MODULES 
//* 

//* FOR PASSIVE MODE ONLY SYSTEMS 


//* 

//S10 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=VTCDM6 , LMOD=VTCDM6 
//ASM.SYSIN DD DSN=S&P. .SYMREL(&NAME) ,DISP=SHR 

//S20 EXEC ASMPCL, P='INT' ,Q=LIB,NAME=VTLUDM6 , LMOD=VTLUDM6 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

// 


For Active/Extended Mode installation: 


/ /ICMGEN15 JOB ICOM, GENICOM, CLASS=A 

//* 

//* LU6.2 EXTERNAL FEATURE 

//* ASSEMBLE AND LINK LU6.2 MODULES 

//* 

//* FOR ACTIVE AND/OR PASSIVE MODE SYSTEMS 

//* 

//S10 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=VTCDM62 , LMOD=VTCDM62 
//ASM.SYSIN DD DSN=6&P. .SYMREL(&NAME) ,DISP=SHR 

//S20 EXEC ASMPCL, P='INT' ,Q=LIB,NAME=VTLUDM62 , LMOD=VTLUDM62 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

//S30 EXEC ASMPCL, P='INT! ,Q=LIB,NAME=VTPASS62 , LMOD=VTPASS62 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

//S40 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=INITLU6 , LMOD=INITLUG6 
//ASM.SYSIN DD DSN=&P. .SYMREL(SNAME) ,DISP=SHR 

// 
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5.10 JOB 16 - ASSEMBLE SYSTEM MODULES (NEW/OLD) 


Job ICMGEN16, which is always produced, causes reassembly and relink of the 
general system modules (containing SETGLOBE code which is global-dependent) 
FESEND and MANAGER and may cause reassembly and relink of modules ICOMCESD 
and IJKCESD (if IAM file support specified in SETGLOBE), IKJDSP01 (if &NUMWQES 
specified in SETGLOBE as other than the default value), POOLDUMP (if &2POOLNM set 
to 0 in SETGLOBE to provide the address of the pool owner instead of Csect name and 
displacement in the printed listing), and INTSTS (if &MULTREG set to 0 in SETGLOBE 
because the Multiregion Facility is not used). 


The above modules are all described in the Operating Reference Manual; see the 
index of that manual for specific references. 


//ICMGEN16 JOB ICOM, GENICOM, CLASS=A 


GENERAL SYSTEM MODULES 


EXEC ASMPCL,P='INT' ,Q=LIB, NAME=POOLDUMP , LMOD=POOLDUMP 
.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

EXEC ASMPCL,P='INT' ,Q=LIB,NAME=ICOMCESD , LMOD=ICOMCESD 
.SYSIN DD DSN=&P. .SYMREL (&NAME) , DISP=SHR 

EXEC ASMPCL, P='INT' ,Q=LIB, NAME=IJKCESD , LMOD=IJKCESD 
.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

EXEC ASMPCL,P='INT! ,Q=LIB, NAME=IJKDSP0O1,LMOD=IJKDSP01 
.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

EXEC ASMPCL, P='INT' ,Q=LIB, NAME=FESEND , LMOD=FESEND 
.SYSIN DD DSN=&P. .SYMREL (&NAME) ,DISP=SHR 

EXEC ASMPCL, P='INT' ,Q=LIB, NAME=MANAGER , LMOD=MANAGER 
.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

EXEC ASMPCL, P='INT' ,Q=LIB,NAME=INTSTS , LMOD=INTSTS 
.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 
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9.11 JOB 18 - PL/1 SUPPORT INSTALLATION (NEW/OLD) 


Job ICMGEN18, produced only if PL/1 support is included, causes reassembly 
and relink of PREPLI and PMIPL1. For a new installation, a SYMPL1 data set is 
allocated with a block size of 4000. Increase the block size if Version 2 of the PL/1 
compiler is used (can be same as SYMREL). For all users, the PL/1 application program 
copy members PENTRY, PLMSGHD, PL1HDR, PLILOGCH and PLIENTRY are copied 
to the SYMPL1 data set. See the Operating Reference Manual, Chapter 3, and the PL/1 
Programmers Guide. SYMPL71 is referenced on the SYSLIB DD statement by the 
supplied Intercomm PL/1 procedures. This data set may also be subsequently used to 
hold symbolic maps for MMU processing by PL/1 application programs (see also 
Message Mapping Utilities). If job 06 (BMN back-off) was executed to update some PL/1 
copy members to SYMLIB, then SYMLIB is concatenated before SYMREL for the INREL 
DD statement for the IEBCOPY step (below). If an existing installation does not use the 
Intercomm supplied PL/1 procedures, then change the OUTPL1 DD statement for the 
IEBCOPY step to the DSN of the system PL/1 copy library. 


NOTE: PREPL!] must be reassembled for ESA and OS/390 upgrades. 
//ICMGEN18 JOB ICOM, GENICOM, CLASS=A 


//* 
//* ALLOCATE PL1 INTERFACE LIBRARY 


EXEC PGM=IEFBR14 

DD DSN=INT.SYMPL1,DISP=(,CATLG) , 

SPACE=(CYL, (1,1,10)), 
UNIT=SYSDA , VOL=SER=INTO001, 

DCB= (DSORG=PO , RECFM=FB , BLKSIZE=4000 , LRECL=80) 


PENTRY, PLMSGHD, PL1HDR, PLIENTRY, 
PLILOGCH TO SYMPL1 


//S20 EXEC PGM=IEBCOPY 
//SYSPRINT DD SYSOUT=A 
/ /INREL DD DSN=INT.SYMREL,DISP=SHR 
//OUTPL1 DD DSN=INT.SYMPL1,DISP=OLD 


//SYSUT3 DD UNIT=SYSDA,SPACE=(TRK, (1) ) 
//SYSUT4 DD UNIT=SYSDA,SPACE=(TRK, (1) ) 
//SYSIN DD * 
COPY OUTDD=OUTPL1 , INDD=INREL 
SELECT MEMBER=((PENTRY,,R) , (PLMSGHD, ,R) ) 
SELECT MEMBER=(PL1HDR, ,R) 
SELECT MEMBER=((PLIENTRY, ,R) , (PLILOGCH, ,R)) 


/* 

//* 

//* ASSEMBLE PL1 INTERFACE MODULES 

//* 

//S30 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=PMIPL1 , LMOD=PMIPL1 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

//* 

//S40 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=PREPLI , LMOD=PREPLI 
//ASM.SYSIN DD DSN=&P..SYMREL (&NAME) , DISP=SHR 

17 
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5.12 JOB 20 - ASSEMBLIES FOR MVS-DEPENDENT CODE (NEW/OLD) 

Job ICMGENZ20, always produced, causes reassembly and relink of modules 
STAEEXIT, STAERTRY, STAETASK, SPIEEXIT (due to MVS ESTAE and ESPIE 
macros), and due to snap list variances: SNAPRTN, SPIESNAP, PMISNAP1, SYCT400, 
PMINQDEQ, CLOSDWN3, PMIDEBUG, INTTABLE; and for MVS code, STARTUP3, 
ICOMCESD, ICOMVCON; and for Test Mode snaps, PMITEST. The above modules are 
described in the Operating Reference Manual (see the index) except INTTABLE which is 
for the Table Facility. This job must be rerun for a conversion from ESA to OS/390 and 
for all ESA and/or OS/390 upgrades. (See also jobs 8 through 18, 21-24, and 70.) 


If &MRSVC or &lISVC has been specified in SETGLOBE (as other than the 
default), SYSEVENT macro execution is automatically generated in STARTUP3 to force 
Intercomm to execute nonswappable; required for all regions except when executing in 
Test Mode. (See the Operating Reference Manual and jobs 30 and 31.) 


/ /ICMGEN20 
//* 
//* 
//* 


JOB ICOM, GENICOM, CLASS=A 


REASSEMBLE AND RELINK MVS-DEPENDENT MODULES 


//S5 
//ASM. 
//S10 
//ASM. 
//815 
//ASM. 
//S20 
//ASM. 
//S25 
//ASM. 
//830 
//ASM. 
//835 
//ASM. 
//S40 
//ASM. 
//s45 
//ASM. 
//S850 
//ASM. 
//S55 
//ASM. 
//S860 
//ASM. 
//S65 
//ASM. 
//S70 
//ASM. 
//875 
//ASM. 


EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 


ASMPCL, P='INT' ,Q=LIB , NAME=ICOMVCON , LMOD=ICOMVCON 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=ICOMCESD , LMOD=ICOMCESD 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=STAEEXIT , LMOD=STAEEXIT 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=STAERTRY , LMOD=STAERTRY 
DD DSN=&P. . SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=STAETASK , LMOD=STAETASK 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=SPIEEXIT , LMOD=SPIEEXIT 
DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=SNAPRTN , LMOD=SNAPRTN 
DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=SPIESNAP , LMOD=SPIESNAP 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=SYCT400 , LMOD=SYCT400 
DD DSN=SP..SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=PMISNAP1 , LMOD=PMISNAP1 
DD DSN=SP. .SYMREL(SNAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=PMINQDEQ , LMOD=PMINQDEOQ 
DD DSN=SP..SYMREL(SNAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=CLOSDWN3 , LMOD=CLOSDWN3 
DD DSN=SP. .SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=PMIDEBUG , LMOD=PMIDEBUG 
DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=INTTABLE , LMOD=INTTABLE 
DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=STARTUP3 , LMOD=STARTUP3 
DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 
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//S80 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=PMITEST,LMOD=PMITEST 
//ASM.SYSIN DD DSN=&P. .SYMREL (&NAME) ,DISP=SHR 
//* 
//* LINK ICOMCESD WITH INTSORT 
//* 
//S85 EXEC LKEDP, P='INT' ,Q=LIB, U=LIB, LMOD=ICOMCESD 
//SYSIN DD * 
INCLUDE SYSLIB(ICOMCESD) 
INCLUDE SYSLIB(INTSORT) 


// 
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5.13. JOB 21 -COBOL ASSEMBLIES AND INSTALL VS COBOL Il (NEW/OLD) 


Job ICMGEN21, produced only if COBOL support is requested, causes 
reassembly and relink of modules PREPROG, COBREENT, and DWSSNAP for snap 
processing. The above modules are described in the COBOL Programmers Guide. If 
COBOL2=YES is specified, then basic installation steps for VS COBOL Il are also 
generated: before executing these steps, ensure the inner macro ANTEST used by 
IBM’s IGZOPD macro is available from SYS1.MACLIB or SYS1.AMODGEN (if not, it is 
available from the end of the |GZOPD macro - copy it to SYMLIB as a separate member 
named ANTEST). 


NOTE: if upgrading from ESA to OS/390 or to a higher level of OS/390, the 
assemblies should be executed again. If upgrading the Release level of 
VS COBOL Il, its installation must be executed again. For installing and 
using VS COBOL Il, ensure the pre-Language Environment versions of 


the VS COBOL Il libraries for compiles, linkedits, and Intercomm 
execution, are used. Language Environment is not currently supported by 
Intercomm. 


/ /ICMGEN21 JOB ICOM, GENICOM , CLASS=A 

bis 

//*  REASSEMBLE AND RELINK IF COBOL 

//* 

//S5 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=COBREENT , LMOD=COBREENT 

//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

//S10 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=PREPROG, LMOD=PRE PROG 

//ASM.SYSIN DD DSN=&SP..SYMREL(&NAME) ,DISP=SHR 

//S15 EXEC ASMPCL, P='INT' ,Q=LIB,NAME=DSWSNAP , LMOD=DWSSNAP 
SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 


INSTALL VS COBOL II 


ASSEMBLE IGZOPD - CREATE ICOM VERSION OF IGZEOPD 
EXEC ASMPCL, P='INT' ,Q=USR,NAME=IGZEOPD , LMOD=IGZEOPD, 
PARM. LKED='LIST,LET,NCAL, RENT , AMODE=31 , RMODE=24'! 
//ASM.SYSIN DD * 
IGZEOPD CSECT 
IGZOPD DEBUG=NO , MIXRES=NO , RTEREUS=NO , STAE=NO, 
LANGUAGE=EN , LIBKEEP=YES , SYSTYPE=OS , WSCLEAR=YES 
END 


(continued) 
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//* RELINK IGZCPCO (RMODE=ANY) AND TO REPLACE IGZEOPD 

//S25 EXEC PGM=IEWL, 

// PARM='LIST, LET, XREF,NCAL, RENT ,AMODE=31 , RMODE=ANY '' 

//MODUSR DD DSN=INT.MODUSR,DISP=SHR 

//SYSLIB DD DSN=SYS1.COB2LIB,DISP=SHR 

//SYSLIN DD DDNAME=SYSIN 

//SYSPRINT DD SYSOUT= 

//SYSLMOD DD DSN=INT.MODLIB,DISP=OLD 

//SYSUT1 DD UNIT=SYSDA, SPACE=(TRK, (2,1) ) 

//SYSIN DD * 
REPLACE IGZEOPD 
INCLUDE SYSLIB(IGZCPCO) 
INCLUDE MODUSR (IGZEOPD) 
ENTRY IGZCPCO 
NAME IGZCPCO (R) 

//* 

//* RELINK IGZCPAC - REMOVE 24-AMODE ROUTINES, 

//* AND LINK IT AS 31-AMODE 

//S30 EXEC PGM=IEWL, 

// PARM='LIST,LET,XREF,NCAL, RENT , AMODE=31 , RMODE=ANY' 

//SYSLIB DD DSN=SYS1.COB2LIB,DISP=SHR 

//SYSLIN DD DDNAME=SYSIN 

//SYSPRINT DD SYSOUT=A 

//SYSLMOD DD DSN=INT.MODLIB ,DISP=OLD 


REQUIRED 
VS COBOL II OS ESM COBPACK 
ICOM VERSION 
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//SYSUT1 DD UNIT=SYSDA,SPACE=(TRK, (2,1) ) 

//SYSIN DD * 
REPLACE IGZCBUG REPLACE THOSE WITH RMODE=24 
REPLACE IGZCCTL SO CAN LINK/LOAD W. RMODE=ANY 
REPLACE IGZCLNK (LOADED DYNAMICALLY) 
REPLACE IGZCRCL (LOADED DYNAMICALLY) 
REPLACE IGZCULE OTHERS NOT USED UNDER 
REPLACE IGZCXFR ICOM 


INCLUDE SYSLIB (IGZCPAC) VS COBOL II GENERAL COBPACK 


ENTRY IGZCPAC 
NAME IGZCPAC (R) 


//* 
//* ASSEMBLE IGZOPT - CREATE ICOM VERSION OF IGZEOPT 


// PARM. LKED='LIST,LET,NCAL, RENT , AMODE=31 , RMODE=24' 
//ASM.SYSIN DD * 
IGZEOPT CSECT 
IGZOPT DEBUG=NO ,MIXRES=NO , RTEREUS=NO , STAE=NO, 
SSRANGE=YES , SPOUT=NO 


END 
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9.14 JOB 22 - FILE HANDLER ASSEMBLIES (NEW/OLD) 


Job ICMGENZ22, which is always produced, causes reassembly and relink of the 
File Handler modules IXFDSCTn (as specified by the user via the DSCT parameter), 
IXFFAR, IXFHNDOO and IXFHND0O1, and will cause reassembly and relink of IXFQISAM 
if IAM file support is specified in SETGLOBE. The Intercomm File Handler and related 
features are described in Chapter 6 of the Operating Reference Manual. 


NOTE: this job must be executed whenever the Version and/or Release level of 
DFSMS is upgraded, in addition to when changing the MVS (ESA and/or 
OS/390) level. 


//ICMGEN22 JOB ICOM, GENICOM, CLASS=A 

//* 

//* FILE HANDLER 

//* 

//S10 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=IXFDSCT1 ,LMOD=IXFDSCT1 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

//S20 EXEC ASMPCL,P="INT' ,Q=LIB, NAME=IXFFAR , LMOD=IXFFAR 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 


//S30 EXEC ASMPCL,P='INT' ,Q=LIB, NAME=IXFHNDOO , LMOD=IXFHNDOO 
//ASM.SYSIN DD DSN=&P..SYMREL (&NAME) ,DISP=SHR 

//S40 EXEC ASMPCL,P='INT' ,Q=LIB, NAME=IXFHNDO1 , LMOD=IXFHNDO1 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

//S50 EXEC ASMPCL,P='INT' ,Q=LIB, NAME=IXFQISAM, LMOD=IXFQISAM 
//ASM.SYSIN DD DSN=&P. .SYMREL (&NAME) ,DISP=SHR 

// 
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9.15 JOB 23 - INSTALL DYNAMIC FILE ALLOCATION (NEW/OLD) 


Job ICMGEN23, produced only if the Dynamic File Allocation Special Feature is 
specified, causes reassembly and relink of IXFDYNAM. The Intercomm Dynamic File 
Allocation facility is described in the Dynamic File Allocation manual. 


NOTE: this job must be executed (if using the DFA special feature) whenever the 
DFSMS level of MVS is upgraded and/or the ESA or OS/390 level is 
upgraded or changed. 


/ /ICMGEN23 JOB ICOM, GENICOM, CLASS=A 
//* 

//*  REASSEMBLE AND RELINK IF DFA 

//* 


//S10 EXEC ASMPCL,P='INT' ,Q=LIB, NAME=IXFDYNAM , LMOD=IXFDYNAM 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 
// 
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5.16 JOB 24 - FILE HANDLER STATISTICS ASSEMBLIES (NEW/OLD) 


Job ICMGEN24, produced only if File Handler Statistics reporting/display is 
requested and the &FHSTATS global value in SETGLOBE is changed from the released 
value of 5 (for detailed statistics counters), causes reassembly and relink of IXFRPTO‘1 
and of affected modules not reassembled in other steps: INTSTORF (if Store/Fetch 
used), IXFB37, IXFCTRL, LOGPUT, RMPURGE, IXFDYALC, IXFVSCRS (if VSAM 
used), IXFQISAM (if ISAM, but not IAM, used), and if file recovery used: IXFCHKPT, 
IXFCREAT, IXFLOG, IXFRVRSE, IXFSNAPL and IXFVERF1. See also the section on 
File Handler Statistics in Chapter 6 of the Operating Reference Manual. 


NOTE: this job should be executed whenever the DFSMS level of MVS is 
upgraded and/or the MVS level (ESA or OS/390) is upgraded or changed. 


/ /ICMGEN24 JOB ICOM, GENICOM, CLASS=A 
//* 
//* FILE HANDLER STATISTICS FACILITY 


EXEC ASMPCL,P='INT' ,Q=LIB,NAME=IXFRPTO1 , LMOD=IXFRPTO1 
.SYSIN DD DSN=&P. .SYMREL (SNAME) , DISP=SHR \ 

EXEC ASMPCL,P='INT!' ,Q=LIB, NAME=INTSTORF , LMOD=INTSTORF 
.SYSIN DD DSN=6P. .SYMREL (&NAME) , DISP=SHR 

EXEC ASMPCL,P='INT! ,Q=LIB, NAME=IXFB37 , LMOD=IXFB37 
.SYSIN DD DSN=&P. .SYMREL (&NAME) , DISP=SHR 

EXEC ASMPCL,P='INT' ,Q=LIB, NAME=IXFCTRL, LMOD=IXFCTRL 
.SYSIN DD DSN=6&P..SYMREL (&NAME) , DISP=SHR 

EXEC ASMPCL,P='INT! ,Q=LIB,NAME=LOGPUT , LMOD=LOGPUT 
.SYSIN DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

EXEC ASMPCL,P='INT' ,Q=LIB,NAME=RMPURGE , LMOD=RMPURGE 
.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

EXEC ASMPCL,P='INT' ,Q=LIB,NAME=IXFDYALC , LMOD=IXFDYALC 
.SYSIN DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

EXEC ASMPCL,P='INT' ,Q=LIB,NAME=IXFVSCRS , LMOD=IXFVSCRS 
.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

EXEC ASMPCL, P=!INT' ,Q=LIB,NAME=IXFQISAM, LMOD=IXFQISAM 
.SYSIN DD DSN=6&P. .SYMREL(&NAME) , DISP=SHR 

EXEC ASMPCL, P='INT' ,Q=LIB,NAME=IXFCHKPT , LMOD=IXFCHKPT 
.SYSIN DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

EXEC ASMPCL, P='INT' ,Q=LIB, NAME=IXFCREAT, LMOD=IXFCREAT 
.SYSIN DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

EXEC ASMPCL,P='INT' ,Q=LIB,NAME=IXFLOG, LMOD=IXFLOG 
.SYSIN DD DSN=&P..SYMREL (&NAME) , DISP=SHR 

EXEC ASMPCL,P='INT!' ,Q=LIB,NAME=IXFRVRSE , LMOD=IXFRVRSE 
.SYSIN DD DSN=6&P. .SYMREL (SNAME) , DISP=SHR 

EXEC ASMPCL,P='INT' ,Q=LIB,NAME=IXFSNAPL , LMOD=IXFSNAPL 
.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

EXEC ASMPCL,P='INT' ,Q=LIB,NAME=IXFVERF1 , LMOD=IXFVERF1 
.SYSIN DD DSN=6P. .SYMREL(&NAME) , DISP=SHR 
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JOB 26 - ASSEMBLE MULTIREGION FACILITY MODULES (NEW/OLD) 


Job ICMGEN26, produced only for Multiregion Intercomm systems, causes 
reassembly and relink of the Multiregion Facility modules (see Multiregion Support 


Facility). 


NOTE: 


/ /ICMGEN26 


//* 
//* 
//* 
//810 
//ASM. 
//S20 
//ASM. 
//830 
//ASM. 
//S40 
//ASM. 
//S50 
//ASM. 
//S60 
//ASM. 
//S70 
//ASM. 
//s80 
//ASM. 
//s90 
//ASM. 


EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 
EXEC 
SYSIN 


//S100 EXEC 


//ASM. 


SYSIN 


//S110 EXEC 


//ASM. 


SYSIN 


//S120 EXEC 


//ASM. 
// 


SYSIN 


the use of Multiregion requires the use of an Interregion SVC for inter- 
region communication. Installation of either the MRSVC or IISVC (see 
SETGLOBE globals) must be planned (see Jobs 30 and 31). 


JOB ICOM, GENICOM , CLASS=A 


MULTI-REGION FACILITY 


ASMPCL, P='INT' ,Q=LIB , NAME=MRINTER , LMOD=MRINTER 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=MRINPUT , LMOD=MRINPUT 
DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=MRSTAE , LMOD=MRSTAE 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=MRPURGE , LMOD=MRPURGE 
DD DSN=&P. . SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=MRCSAMOD , LMOD=MRCSAMOD 
DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=MROTPUT , LMOD=MROTPUT 
DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=MROMNGR , LMOD=MROMNGR 
DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=MRLOGOT , LMOD=MRLOGOT 
DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=MRLOGIN , LMOD=MRLOGIN 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=MRBATCH , LMOD=MRBATCH 
DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=MRCONSS , LMOD=MRCONSS 
DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB , NAME=MRMOD , LMOD=MRMOD 

DD DSN=&P..SYMREL(&NAME) , DISP=SHR 
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5.18 JOB 28 - MULTIREGION TABLE ASSEMBLIES (NEW/OLD) 


Job ICMGEN28, produced only for Multiregion Intercomm systems, causes 
assembly and linkedit of the Multiregion tables MRMCT and PMIRDTOO. For new 
installations, it first copies them from SYMREL to SYMUSR. The load module for 
MRMCT is placed in the system link pack area library (LPALIB) for MVS systems. The 
MRMCT must be in FLPA (not EFLPA) or MLPA, and NOPROT must be specified on the 
FIX (or MLPA) parameter in the IEASYSnn PARMLIB member used at system IPL. See 
Multiregion Support Facility. Under Release 11, it is not necessary to reinstall the 
MRMCT unless upgrading from ESA to OS/390. 


For a new installation, dynamic user program source and load libraries are 
allocated at this time with names of the form INT.region-id.SYMDYNL and INT.region- 
id. MODDYNL, where region-ids are CR, SR1 and SR2. If a value is coded for the P 
parameter for ICOMGEN, that value is substituted for the default prefix INT. These 
libraries are to be used to contain user subsystems and subroutines which will execute 
under Intercomm. In a Multiregion system, a unique dynamic load library data set must 
be specified in each region for both the STEPLIB concatenation and for the DYNLLIB 
data set (see job 90), and each may have only one extent for dynamic linkedit to function 
(see Operating Reference Manual). User application programs and subroutines may be 
resident in the Intercomm linkedit or dynamically loaded when needed. See job 29 for 
allocation of SYMDYNL and MODDYNL for a single region system. 


//ICMGEN28 JOB ICOM, GENICOM, CLASS=A 
//* 

//* COPY MRMCT, PMIRDTOO TO SYMUSR (FIRST TIME ONLY) 
/{* 

//810 EXEC PGM=IEBUPDTE 

//SYSPRINT DD SYSOUT=A 

//SYSUT1 DD DSN=INT.SYMREL,DISP=OLD 
//SYSUT2 DD DSN=INT.SYMUSR,DISP=OLD 
//SYSIN DD * 

./ REPRO NAME=MRMCT 

./ REPRO NAME=PMIRDTOO 

./ ENDUP 

/* 

//* 

//* ASSEMBLE RDT 


EXEC ASMPCL, P='INT' ,Q=USR,NAME=PMIRDTOO ,LMOD=PMIRDTOO, 
PARM. LKED= (XREF , LIST, NCAL, LET) 


ASSEMBLE MCT 


EXEC ASMPCL, P='INT' ,Q=USR,NAME=MRMCT , LMOD=MRMCT, 
PARM. LKED= (LIST, LET, RENT) 
//LKED.SYSLMOD DD DSN=SYS1.LPALIB(&LMOD) , DISP=OLD 


(continued) 
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fi 


//* 

//S40 
//SDYNCR 
// 

// 

// 

//* 

/ /MDYNCR 
// 

// 

// 

//* 
//SDYNSR1 
// 

// 

// 

//* 
//MDYNSR1 
Ef 

// 

// 

//* 

/ /SDYNSR2 
// 

ag) 

// 

//* 

/ /MDYNSR2 
// 
// 
// 
// 


//* ALLOCATE DYNAMIC SUBSYSTEM LIBRARIES 


EXEC PGM=IEFBR14 
DD DSN=INT.CR.SYMDYNL,DISP=(,CATLG), 
SPACE=(CYL, (5,2,50)), 

UNIT=SYSDA, VOL=SER=INTOO1, 

DCB= (DSORG=PO0 , RECFM=FB , BLKSIZE=6160 , LRECL=80) 


DD DSN=INT.CR.MODDYNL,DISP=(,CATLG) , 
SPACE= (CYL, (5,,50)), 
UNIT=SYSDA , VOL=SER=INTOO1, 

DCB= (DSORG=PO , RECFM=U , BLKSIZE=61 60) 


DD DSN=INT.SR1.SYMDYNL,DISP=(,CATLG) , 
SPACE= (CYL, (5,2,50)), 

UNIT=SYSDA, VOL=SER=INT001, 

DCB= (DSORG=PO , RECFM=FB , BLKSIZE=6160 , LRECL=80) 


DD DSN=INT.SR1.MODDYNL,DISP=(,CATLG) , 
SPACE= (CYL, (5,,50)), 
UNIT=SYSDA , VOL=SER=INT001, 

DCB= (DSORG=PO , RECFM=U , BLKSIZE=6160) 


DD DSN=INT.SR2.SYMDYNL,DISP=(,CATLG) , 

SPACE= (CYL, (5,2,50)), 

UNIT=SYSDA , VOL=SER=INTOO1, 

DCB= (DSORG=PO0 , RECFM=FB , BLKSIZE=6160 , LRECL=80) 


DD DSN=INT.SR2.MODDYNL,DISP=(,CATLG) , 
SPACE= (CYL, (5,,50)), 
UNIT=SYSDA , VOL=SER=INTO01, 

DCB= (DSORG=PO , RECFM=U , BLKSIZE=6160) 
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5.18.1 JOB 29 - AALOCATE SYM/MODDYNL IF NOT MULTREG (NEW) 


Job ICMGEN29, produced only for new users without a Multiregion environment, 
allocates dynamic user program source and load module libraries with names of the form 
INT.SYMDYNL and INT.MODDYNL. If a value is coded for the P parameter for 
ICOMGEN, that value is substituted for the prefix INT. The dynamic load library must be 
unique to each Intercomm region (allocate additional libraries with other prefix names for 
other regions, including the test system) and must be specified in the execution JCL for 
both the STEPLIB concatenation and for the DYNLLIB data set (see job 90), and each 
load library may have only one extent for dynamic linkedit to function (see Operating 
Reference Manual). User application programs and subroutines may be resident in the 
Intercomm linkedit or dynamically loaded when needed. See job 28 for allocation of 
SYMDYNL and MODDYNL data sets in a Multiregion environment. 


/ /ICMGEN29 JOB ICOM ,GENICOM, CLASS= 
hag 
//* ALLOCATE DYNAMIC SUBSYSTEM LIBRARIES 


t 


EXEC PGM=IEFBR14 

DD DSN=INT.SYMDYNL,DISP=(,CATLG) , 
SPACE= (CYL, (5,2,50)), 
UNIT=SYSDA , VOL=SER=INT001, 

DCB= (DSORG=PO , RECFM=FB , BLKSIZE=6160 , LRECL=80) 


DD DSN=INT.MODDYNL ,DISP=(,CATLG) , 
SPACE= (CYL, (5,,50)), 
UNIT=SYSDA,VOL=SER=INT001, 

DCB= (DSORG=PO , RECFM=U , BLKSIZE=6160) 
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5.19 JOB 30- INSTALL INTERREGION MRSVC (NEW/OLD) 


Job ICMGEN30, produced only if &MRSVC is specified in SETGLOBE as other 
than the default value, assembles module IGCICOM (Type 1 SVC) and linkedits it into 
the MVS system library (NUCLEUS) as IGCnnn, where nnn is the numerical &MRSVC 
value (set to 237 when producing JCL illustrated below). This is an Intercomm 
interregion SVC, which is used for Multiregion Intercomm systems (see job 26), the 
Extended Security System, the Fastsnap facility, and to use the SYSEVENT macro to 
make Intercomm execute nonswappable (see job 20). See Chapter 7 of the Operating 
Reference Manual for further details on installing the Intercomm interregion MRSVC. 
Reinstallation under Release 11 is recommended (reassemble and link to the MVS 
system library) and required if upgrading to OS/390. 


See job 31 if using the IISVC instead of MRSVC. 


/ /ICMGEN30 JOB ICOM, GENICOM , CLASS=A 


GENERATE INTERCOMM SVC " 


EXEC ASMPCL, P='INT' ,Q=USR,NAME=IGCICOM, LMOD=IGC237, 
PARM. LKED= (LIST, LET, RENT) 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 
//LKED.SYSLMOD DD DSN=SYS1.NUCLEUS (&LMOD) ,DISP=OLD 


// 
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5.19.1 JOB 31 - INSTALL INTERREGION IISVC (NEW/OLD) 


Job ICMGEN31, produced only if &IISVC (Intercomm Integrity SVC) is specified 
in SETGLOBE as other than the default value, links the Type 2 SVC load module 
IGCICSVC to SYS1.NUCLEUS as I|GCnnn (where nnn is the numerical &IISVC value - 
set to 237 when producing JCL illustrated below), and then reassembles and links 
system (and ESS, if used) modules which use the SVC. This SVC is reentrant and 
requires the LOCAL lock at entry. It performs within the SVC all functions previously 
accessed via the MRSVC, but removes the possibility of executing in Supervisor State or 
Protect Key O in open code, shields the Operating System from illegal access by all 
programs, and validates the calling user and requested functions. If the IISVC is 
installed later, also reassemble and link all SPA tables which assemble the SPALIST 
macro (INTSPA, CRSPA, etc.). Mulitiregion modules which use liSVC are reassembled 
and linked in job 26, which must also be executed if a later conversion from use of 
MRSVC to IISVC is done, and the Multiregion Facility is used. Relink of the SVC to the 
operating system nucleus is required for Release 11 if ESS is used, and for an upgrade 
from ESA to OS/390. 


See job 30 if using MRSVC instead of IISVC. 


//ICMGEN31 JOB ICOM, GENICOM, CLASS=A 
//* 
//* LINK IISVC 
//* 
//s5 EXEC LKEDP,Q=REL, P='INT' , PARM. LKED= (LIST, LET, RENT) 
//LKED.SYSLMOD DD DSN=SYS1.NUCLEUS , DISP=OLD 
//SYSIN DD * 

CHANGE IGCICSVC (IGC237) 

INCLUDE SYSLIB (IGCICSVC) 

NAME IGC237 (R) 
//* 
//* ASSEMBLE MODULES USING IISVC 
//* 
//S10 EXEC ASMPCL,Q=LIB, P='INT' ,NAME=STARTUP3 , LMOD=STARTUP3 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) ,DISP=SHR 
//S20 EXEC ASMPCL,Q=LIB, P='INT' , NAME=CLOSDWN3 , LMOD=CLOSDWN3 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) ,DISP=SHR 
//S30 EXEC ASMPCL,Q=LIB, P='INT' ,NAME=STAEEXIT,LMOD=STAEEXIT 
//ASM.SYSIN DD DSN=S&P. .SYMREL (&NAME) , DISP=SHR 
//S40 EXEC ASMPCL,Q=LIB, P='INT' , NAME=PMISNAP1 , LMOD=PMISNAPL1 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 
//S50 EXEC ASMPCL,Q=LIB, P='INT' ,NAME=IJKDSPO1 , LMOD=IJKDSPO1 
//ASM.SYSIN DD DSN=&P. .SYMREL (&SNAME) ,DISP=SHR 
//S60 EXEC ASMPCL,Q=LIB, P='INT' ,NAME=INTVRBOO , LMOD=INTVRBOO 
//ASM.SYSIN DD DSN=&P. . SYMREL(&NAME) ,DISP=SHR 
//S70 EXEC ASMPCL,Q=LIB, P='INT' ,NAME=INTSECOO , LMOD=INTSECOO 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 
//S80 EXEC ASMPCL,Q=LIB, P='INT' ,NAME=INTSECO2 , LMOD=INTSECO2 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 
// 
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5.20 JOB 32 - INSTALL EXTENDED SECURITY SYSTEM (NEW) 


Job ICMGEN32, produced only for new installations of Intercomm using the = 
Extended Security System, creates the SECURITY data set and assembles and linkedits 
the SECVECT table into the MVS LPALIB data set. The SECVECT table must be in 
FLPA (not EFLPA) or MLPA, and NOPROT must be specified on the FIX (or MLPA) 
parameter in the IEASYSnn PARMLIB member used at system IPL. For further details, 
and SECVECT table generation options, see the installation chapter of Extended 
security System. The user may increase the space allocation for the SECURITY file 
depending on the algorithm for calculating space needs as described in the installation 


chapter of Extended Security System. 


Existing installations need not execute this job unless installing ESS for the first 
time or upgrading to OS/390 (reassemble and link SECVECT to the system LPALIB). An 
existing installation should back up the Release 9 or 10 SECURITY file before testing 
with it under Release 11. Other requirements for upgrade of ESS to Release 11 are 
detailed in the Planning Guide. 


NOTE: the use of ESS requires the use of an SVC, as online ESS control blocks 
are in store-protected core. Installation of either MRSVC or IISVC (see 
SETGLOBE globals) must be planned (see jobs 30 and 31). 


/ /ICMGEN32 JOB ICOM, GENICOM, CLASS=A 


if 
//* EXTENDED SECURITY SYSTEM 


if J 
//810 EXEC PGM=SECFILE, PARM=01 7 
//STEPLIB DD DSN=INT.MODREL,DISP=SHR 
//SECURITY DD DSN=INT.SECURITY ,DISP=(,CATLG,DELETE) , 

VOL=SER=INTO001 , UNIT=SYSDA, SPACE= (CYL, (3)), 

DCB= (DSORG=DA , BLKSIZE=256 , RECFM=F , OPTCD=R) 


//S20 EXEC ASMPCL, P='INT' ,Q=LIB, U=REL,NAME=SECVECT , LMOD=SECVECT 
//ASM. SYSIN DD * 
SVECT DSECT=NO 
END 
//LKED.SYSLMOD DD DSN=SYS1.LPALIB(&LMOD) ,DISP=OLD 
// 
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5.21 JOB 34- ASSEMBLE SYSTEM TABLES (NEW/OLD) 


Job ICMGEN34, which is always produced, unconditionally causes the assembly 
and linkedit of tables PMIBROAD, PMIDEVTB, PMIFILET, PMISTATB, PMIVERBS, 
NEWPOOLS (for Intercomm pools), and REENTSBS and the INTLOAD subroutine 
interface routine linked with dynamically loaded programs (except COBOL) which copies 
the same USRSUBS entries as REENTSBS for direct calls from BAL and PL/1 programs. 
Also, the assembly and linkedit of the following tables is generated depending upon the 
following conditions: 


e MMUVTBL - if MMU is used (See Message Mapping Utilities) 


e BTVRBTB - if dynamically loaded at startup (DYNVERB=YES), the load 
module is named BTVERBnn instead of BTVRBTB 


e FETABLE (user-specified table name) - if the Front End Network Table is to 
be assembled and linkedited separately from BTVRBTB 


e VTIDTABL - if a VTAM Front End is used (see SNA Terminal Support Guide) 
(delete this step if no VTIDTABL created, or it is generated in the Front End 
Network Table) 


e BTAMSCTS - if a BTAM or Extended TCAM Front End is used (delete this 
step if queuing information coded on BTERM terminal definitions) 


e |IC31PL00 - if DYNPOOL=P31 or YES was coded for the ICOMGEN macro 
assembly. 


For existing installations, if a name for the Intercomm pools module (ICOMPOOL 
macros) other than NEWPOOLS is used, change the name in the assembly step before 
executing this job. If a Multiregion system is used with different pools modules, then add 
assembly steps for each module. The generated linkedit control decks (see job 80) must 
also be correspondingly changed if the 24-Amode pools are resident (DYNPOOL=P31 or 
NO). For Release 9 installations, the COREACCT macro previously hard-coded in 
MANAGER must be coded as the first macro in the user’s pools module(s), before the 
ICOMPOOL macros. See the Operating Reference Manual, Chapter 5, and Basic 
system Macros for COREACCT coding values (and NEWPOOLS on SYMREL for coding 
example). If dynamically loaded 31-Amode pools are used/coded, add assembly steps 
for each module for each region, as needed. 
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Unless otherwise noted above, coding of these tables is described in the 
Operating Reference Manual (use the index to find specific table names). 
Recommended parameter coding for the macros in the network related tables 
(FETABLE, PMISTATB, PMIDEVTB) are provided under descriptions of specific terminal 
types in the applicable TP Network installation description manuals. Under a Multiregion 
system, the same version of PMISTATB and PMIDEVTB should be used in every region, 
and the same basic version of REENTSBS and INTLOAD (if used) in every Satellite 
region. The Front End Network Table (FETABLE), BTVRBTB, BTAMSCTS and/or 
VTIDTABL, and PMIBROAD may only be in the control region. If a Broadcast Table is 
needed in a satellite region, then different versions should be used in each region 
specifying only those terminals which may execute subsystems in the region. 


NOTE: after an upgrade of BTAM or VTAM, the Front End Network Table must 
be reassembled along with the corresponding Front End modules. 


The previous requirement to modify the FEMACGBL global table, if more 
than 1000 subsystems or terminals or verbs (or SUBSYS macros in the 
RDT for Multiregion) are defined, is no longer necessary because 
K'LASM (and Assembler H V2) automatically expand global arrays, as 
needed. Changes needed for more than 10,000 terminals in a VTAM 
environment are described in the installation chapter of SNA Terminal 


support Guide. 


/ /ICMGEN34 JOB ICOM, GENICOM, CLASS=A 

//* 

//* TABLES 

//* 

//S5 EXEC ASMPCL,P='INT' ,Q=USR,NAME=PMIBROAD , LMOD=PMIBROAD 
//S10 EXEC ASMPCL,P='INT' ,Q=USR,NAME=PMIDEVTB , LMOD=PMIDEVTB 
//S15 EXEC ASMPCL, P='INT' ,Q=USR,NAME=PMIFILET,LMOD=PMIFILET 
//S20 EXEC ASMPCL,P='INT' ,Q=USR,NAME=PMISTATB , LMOD=PMISTATB 
//S25 EXEC ASMPCL,P='INT' ,Q=USR,NAME=PMIVERBS , LMOD=PMIVERBS 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) ,DISP=SHR 

//S30 EXEC ASMPCL, P='INT' ,Q=USR,NAME=NEWPOOLS , LMOD=NEWPOOLS 
//S35 EXEC ASMPCL,P='INT' ,Q=USR,NAME=MMUVTBL , LMOD=MMUVTBL 
//S40 EXEC ASMPCL,P='INT' ,Q=USR,NAME=BTVRBTB , LMOD=BTVRBTB 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

//S45 EXEC ASMPCL,P='INT' ,Q=USR,NAME=FENETWRK , LMOD=FENETWRK 
//S50 EXEC ASMPCL,P='INT' ,Q=USR,NAME=VTIDTABL,LMOD=VTIDTABL 
//S55 EXEC ASMPCL,P='INT' ,Q=USR,NAME=BTAMSCTS , LMOD=BTAMSCTS 
//* 

//* SUBROUTINE INTERFACE 

//* 

//S60 EXEC ASMPCL,P='INT' ,Q=USR,NAME=REENTSBS , LMOD=REENTSBS 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

//S65 EXEC ASMPCL,P='INT' ,Q=USR,NAME=INTLOAD , LMOD=INTLOAD 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

//* 

//* 31-AMODE POOLS 

//* 

//S70 EXEC ASMPCL,P='INT' ,Q=USR,NAME=IC31PL00 ,LMOD=IC31PLOO, 
// AM=31 , RM=ANY For loading above 16M line 
// 
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9.22 JOB 36 - RELINK OFFLINE UTILTIES (NEW/OLD) 


Job ICMGENS36, always produced, causes reassembly and relink of the module 
BATCHPAK, and relink of the BDAM file load utility PMIEXLD, the Store/Fetch data set 
print utility DUMPREST (if STORFCH=YES), and the MMU map load utility LOADMAPS 
(if MMU=YES). See the Operating Reference Manual for a description of PMIEXLD, 
store/Fetch Facility for DUMPREST, and Message Mapping Utilities for LOADMAPS. 


NOTE: this job must also be rerun after SMs are applied, along with the relink of 
DDQPRINT described in job 40. 


//ICMGEN36 JOB ICOM, GENICOM, CLASS=A 
//* 
//* RELINK OFFLINE UTILITIES 
//* 
//S5 EXEC ASMPCL,P='INT' ,Q=LIB, NAME=BATCHPAK , LMOD=BATCHPAK 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 
//* 
//S10 EXEC LKEDP, P='INT' ,Q=USR,LMOD=PMIEXLD 
//LKED.SYSLMOD DD DSN=&P. .MODLIB(&LMOD) ,DISP=SHR 
//LKED.SYSIN DD * 
INCLUDE SYSLIB(PMILOAD , PMIFILET , PMISERC3) 
INCLUDE SYSLIB(IXFHNDOO, IXFHNDO1,BATCHPAK) 
/* 
//S15 EXEC LKEDP,P='INT' ,Q=LIB, LMOD=DUMPREST 
//LKED.SYSIN DD * 
INCLUDE SYSLIB(SFDMPRST, INTSTORF , STOSTART) 
INCLUDE SYSLIB(IXFHNDOO , IXFHNDO1 , BATCHPAK) 
/* 
//S20 EXEC LKEDP, P='INT' ,Q=LIB, LMOD=LOADMAPS 
//LKED.SYSIN DD * 
INCLUDE SYSLIB (LOADMAP , STOSTART, INTSTORF) 
INCLUDE SYSLIB (BATCHPAK, IXFHNDOO , IXFHNDO1) 
/* 
// 
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5.23 JOB 38 - ASSEMBLE SPA AND SCT TABLES (NEW/OLD) 


Job ICMGEN38, which is always produced, causes the assembly and linkedit of 
the SPA and SCT modules. These are INITSPA and INTSCT if a single region only, or 
CRSPA, SR1SPA, SR2SPA and CRSCT, SR1SCT and SR2SCT if a Multiregion 
Intercomm system is being installed. New users should refer back to job 02 regarding 
copy members for SCT module assemblies. For an existing Multiregion installation, the 
names of the tables may be changed in the generated JCL; add additional assembly 
steps if more than two satellite regions are used. Also change the Q parameter if 
different user libraries are used for each region. Coding of INTSPA and INTSCT is 
described in Chapter 3 of the Operating Reference Manual. Further considerations apply 
if a Multiregion system is being generated, see Multiregion Support Facility. 


For Single Region: 


//ICMGEN38 JOB ICOM, GENICOM, CLASS=A 
//* 
//* SINGLE REGION SPA AND SCT ‘ 
//* 


//S10 EXEC ASMPCL,P='INT' ,Q=USR,NAME=INTSPA,LMOD=INTSPA 
//S20 EXEC ASMPCL,P='INT' ,Q=USR,NAME=INTSCT,LMOD=INTSCT 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) ,DISP=SHR 

// 


For Multiregion: 


/ /ICMGEN38 JOB ICOM, GENICOM, CLASS=A 

//* 

//* MULTIREGION SPA'S AND SCT'S 

//* 

//S10 EXEC ASMPCL, P='INT' ,Q=USR,NAME=CRSPA ,LMOD=CRSPA 
//S20 EXEC ASMPCL, P='INT' ,Q=USR,NAME=SR1SPA,LMOD=SR1SPA 
//S30 EXEC ASMPCL, P='INT' ,Q=USR,NAME=SR2SPA,LMOD=SR2SPA 


//S40 EXEC ASMPCL, P='INT' ,Q=USR,NAME=CRSCT ,LMOD=CRSCT 
//ASM.SYSIN DD DSN=&P. .SYMREL (&NAME) , DISP=SHR 

//S50 EXEC ASMPCL,P='INT' ,Q=USR,NAME=SR1SCT,LMOD=SR1SCT 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

//S60 EXEC ASMPCL,P='INT' ,Q=USR,NAME=SR2SCT,LMOD=SR2SCT 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) ,DISP=SHR 

// 
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5.24 JOB 40 - ASSEMBLE DDQ FACILITY MODULES (NEW/OLD) 


Job ICMGEN40, produced only if Dynamic Data Queuing is specified or forced, 
causes the reassembly and relink of modules DDQMOD and DDQSTART and the table 
DDQDSTBL, which is first copied from SYMREL to SYMUSR if this is a new installation. 
In addition, the offline utility DDQPRINT is relinked to MODLIB to INCLUDE the user 
DDQDSTBL. If the DDQ global is set to 1 in SETENV, then BSEGMOD (for BTAM 
segmented input processing) is also reassembled due to snap list variations between 


operating systems. See Dynamic Data Queuing Facility. 


NOTE: for existing installations, ensure that the existing version of DDQENV has 
been copied to the Release 11 SYMLIB (or update the Release 11 
version from SYMREL to SYMLIB) before executing this job. 


/ /ICMGEN40 JOB ICOM, GENICOM, CLASS=A 
//* 
//* DYNAMIC DATA QUEUEING 
//* 
//S10 EXEC ASMPCL, P='INT' ,Q=LIB,NAME=DDQMOD , LMOD=DDQMOD 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 
//S20 EXEC ASMPCL, P='INT' ,Q=LIB,NAME=DDQSTART , LMOD=DDQSTART 
//ASM.SYSIN DD DSN=&P. .SYMREL (&NAME) , DISP=SHR 
//S30 EXEC ASMPCL,P='INT' ,Q=LIB, NAME=BSEGMOD , LMOD=BSEGMOD 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 
//* 
//* COPY DDQDSTBL TO SYMUSR (FIRST TIME ONLY) 
//* 
//S40 EXEC PGM=IEBUPDTE 
//SYSPRINT DD SYSOUT=A 
//SYSUT1 DD DSN=INT.SYMREL,DISP=OLD 
//SYSUT2 DD DSN=INT.SYMUSR ,DISP=OLD 
//SYSIN DD * 
./ REPRO NAME=DDQDSTBL 
./ ENDUP 
/* 
//* 
//* BSSEMBLE DDQDS TABLE 
//* 
//S50 EXEC ASMPCL, P='INT' ,Q=USR,NAME=DDQDSTBL , LMOD=DDQDSTBL 
//* 
//* LINK DDQPRINT UTILITY 
//* 
//S60 EXEC LKEDP, P='INT' ,Q=USR,LMOD=DDQPRINT 
//LKED.SYSLMOD DD DSN=&P..MODLIB(&LMOD) ,DISP=SHR 
//LKED.SYSIN DD * 
ENTRY DDQBATCH 
INCLUDE SYSLIB(DDQPRT) 
CHANGE DDQENTRY (DDQPRT) 
INCLUDE SYSLIB (DDQSTART ,DDQMOD , IXFHNDOO) 
INCLUDE SYSLIB(IXFHNDO1 ,BATCHPAK , PMIGETNB) 
INCLUDE SYSLIB (DDQDSTBL) 
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9.29 JOB 42 - CREATE DDQ DATA SETS (NEW) 


Job ICMGEN42, produced only for a new installation if Dynamic Data Queuing is 
specified or forced, causes the creation of one (if single region used) or three (one for 
the control region and one for each satellite region) DEF (default) DDQ data sets, and a 
THREDLOG DDQ data set for single region or for SR1 (Satellite Region 1) use of 
Backout-on-the-Fly, in addition to the Space Control File (SCF) and the Queue Control 
File (QCF). In a Multiregion environment, the SCF and QCF data sets are shared across 
all regions using DDQ. If the P parameter is coded on the ICOMGEN macro, that value 
is used instead of the default prefix INT. See Dynamic Data Queuing Facility. 


For Single Region: 


/ /ICMGEN42 JOB ICOM, GENICOM, CLASS=A 

//* 

//* CREATE DDQ DATASETS AND SPACE CONTROL FILE (SCF) 

//* 

//S10 EXEC PGM=CREATEGF 

//STEPLIB DD DSN=INT.MODREL, DISP=SHR 

//SYSPRINT DD SYSOUT=A 

//SYSUDUMP DD SYSOUT=A,SPACE=(TRK, (0,20) ) 

//DEFCR DD DSN=INT.DDQDEF,DISP=(,CATLG,DELETE) , 
UNIT=SYSDA , VOL=SER=INTOO1,SPACE=(CYL, (1)), 
DCB= (DSORG=DA , BLKSIZE=4096 , RECFM=F) 
DD DSN=INT.THREDLOG ,DISP=(,CATLG,DELETE) , 
UNIT=SYSDA , VOL=SER=INTO01,SPACE=(CYL, (1)), 
DCB= (DSORG=DA , BLKSIZE=4096 , RECFM=F) 
DD DSN=INT.SCF,DISP=(,CATLG,DELETE), 
UNIT=SYSDA , VOL=SER=INTO01,SPACE=(TRK, (3)), 
DCB= (DSORG=DA ,, BLKSIZE=1200 , RECFM=F) 

//SYSIN DD * 

F DEFCR 0000050 

F THREDLOGOO000050 
0000026 


CREATE QUEUE CONTROL FILE (QCF) 


EXEC PGM=KEYCREAT, PARM=500 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//INTKEYFL DD DSN=INT.QCF,DISP=(,CATLG,DELETE) , 
UNIT=SYSDA , VOL=SER=INT001, SPACE=(120, (500)), 
DCB= (DSORG=DA , BLKSIZE=120 , RECFM=F , KEYLEN=16) 
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For Multiregion: 


/ / ICMGEN42 ICOM, GENICOM, CLASS=A 


//* 

//* CREATE DDQ DATASETS AND SPACE CONTROL FILE (SCF) 
//* 

//S10 EXEC PGM=CREATEGF 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//SYSPRINT DD SYSOUT=A 

//SYSUDUMP DD SYSOUT=A,SPACE=(TRK, (0,20) ) 

//DEFCR DD DSN=INT.CR.DDQDEF,DISP=(,CATLG,DELETE) , 
// UNIT=SYSDA , VOL=SER=INTO01,SPACE=(CYL, (1)), 
// DCB= (DSORG=DA , BLKSIZE=4096 , RECFM=F) 

//DEFSR1l1 DD DSN=INT.SR1.DDQDEF,DISP=(,CATLG,DELETE) , 
// UNIT=SYSDA , VOL=SER=INT001,SPACE= (CYL, (1)), 
// DCB= (DSORG=DA , BLKSIZE=4096 , RECFM=F) 

//DEFSR2 DD DSN=INT.SR2.DDQDEF,DISP=(,CATLG,DELETE) , 
// UNIT=SYSDA , VOL=SER=INT001,SPACE=(CYL, (1)), 
// DCB= (DSORG=DA , BLKSIZE=4096 , RECFM=F) 
//THREDLOG DD DSN=INT.SR1.THREDLOG,DISP=(,CATLG,DELETE) , 
// UNIT=SYSDA , VOL=SER=INT001,SPACE=(CYL, (1)), 
// DCB= (DSORG=DA , BLKSIZE=4096 , RECFM=F)). 

//SCF DD DSN=INT.SCF,DISP=(,CATLG ,DELETE) , 

// UNIT=SYSDA , VOL=SER=INT001,SPACE=(TRK, (3)), 
// DCB= (DSORG=DA, BLKSIZE=1200 , RECFM=F) 

//SYSIN DD * 

F DEFCR 0000050 

F DEFSR1 0000050 

F DEFSR2 0000050 

F THREDLOGOO000S50 

F SCF 0000026 

/* 

//* 

//* CREATE QUEUE CONTROL FILE (QCF) 

//* 

//S20 EXEC PGM=KEYCREAT, PARM=500 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//INTKEYFL DD DSN=INT.QCF,DISP=(,CATLG,DELETE) , 

// UNIT=SYSDA , VOL=SER=INTO01,SPACE=(120, (500)), 
// DCB= (DSORG=DA , BLKSIZE=120 , RECFM=F , KEYLEN=16) 
// 


JOB 
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5.26 JOB 44 - ASSEMBLE EDIT/OUTPUT UTILITY MODULES (NEW/OLD) 


Job ICMGEN44, which is always produced, causes the reassembly and relink of 
modules PMIOUTPT and PMIEDIT which contain SETGLOBE global dependencies. 
See Chapter 3 of the Operating Reference Manual. 


/ /ICMGEN44 JOB ICOM, GENICOM, CLASS=A 

1 hg 

//* EDIT AND OUTPUT UTILITIES 

//* 

//S10 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=PMIOUTPT,LMOD=PMIOUTPT 


//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

//S20 EXEC ASMPCL, P='INT' ,Q=LIB,NAME=PMIEDIT,LMOD=PMIEDIT 
//ASM.SYSIN DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

// 
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5.27 JOB 46 - CREATE CHECKPOINT FILE (NEW), 
AUTO-RESTART FILE (NEW/OLD) 


Job ICMGEN46, produced only for installations where Checkpoint/Restore is 
specified or forced, creates a CHEKPTFL data set if the installation is new, and the 
Automated Restart STRTUPSW file (initialized for STARTUP). Note that if executing in a 
Multiregion environment, message restart (and file recovery) should be limited to one 
region. The checkpoint and Auto-Restart files may not be shared across regions, 
therefore multiple unique data sets must be created if checkpoint or message restart 
processing is specified for more than one region. See Chapter 9 of the Operating 
Reference Manual. 


//ICMGEN46 JOB ICOM, GENICOM, CLASS=A 

//* 

//* CREATE CHEKPTFL DATA SET 

//* 

//810 EXEC PGM=CREATEGF 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//SYSPRINT DD SYSOUT=A 

//SYSUDUMP DD SYSOUT=A,SPACE=(TRK, (0,20) ) 

//CHEKPTFL DD DSN=INT.CHEKPTFL,DISP=(,CATLG,DELETE) , 
UNIT=SYSDA,VOL=SER=INTO0O1, 
DCB= (DSORG=DA , BLKSIZE=192 , RECFM=F) , 
SPACE= (192,200) 

//SYSIN DD * 

F CHEKPTFL 000200 

/* 

//* 

//* CREATE AUTO-RESTART FILE 

//* 

//S20 EXEC PGM=AUTORSET, PARM=STARTUP 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//STRTUPSW DD DSN=INT.STRTUPSW,DISP=(,CATLG,DELETE), 
UNIT=SYSDA , VOL=SER=INTOO1, 
SPACE=(TRK, (1) ) , DCB=DSORG=DA 
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9.28 JOB 48 - CREATE FILE HANDLER STATISTICS FILE (NEW) 


Job ICMGEN48, produced only for new installations where File Handler Statistics 
are requested, creates a STATFILE data set. Note that the data set is only necessary if 
cumulative statistics across several Intercomm executions is desired. Also, in a 
Multiregion environment, the statistics file may not be shared across regions. Therefore, 
unique data sets must be created for each region if desired. See Chapter 6 of the 


Operating Reference Manual. 


//ICMGEN48 JOB ICOM ,GENICOM,CLASS=A 

//* 

//* CREATE STATFILE DATA SET 

//* 

//810 EXEC PGM=CREATEGF 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//SYSPRINT DD SYSOUT=A 

//SYSUDUMP DD SYSOUT=A,SPACE=(TRK, (0,20) ) 

//STATFILE DD DSN=INT.STATFILE ,DISP=(,CATLG,DELETE), 
UNIT=SYSDA , VOL=SER=INTOO1, 
DCB= (DSORG=DA , BLKSIZE=560) , 
SPACE= (560 ,100) 

//SYSIN DD * 

F STATFILE 000100 

/* 

// 
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5.29 JOB 50 - PAGE FACILITY INSTALLATION (NEW/OLD) 


Job ICMGEN50 is no longer created for Release 11 because neither the Page 
data sets nor the PAGETBLE is needed for the revised version of the Page Facility 
(which instead uses the Table Facility to dynamically create a Master Page Table and the 
Response Tables above the 16M line (in 31-Amode Intercomm pools if installed - see job 
34)). See Page Facility and Table Facility for additional SPALIST macro parameters to 
define for these facilities. 


NOTE: ICOMLINK forces an INCLUDE for the sample USRPAGEX user exit if 
UTILITY=PAGE (or ALL) is specified on the ICOMGEN or ICOMLINK 
macros. See Page Facility for further details on this user exit, which is 


optional. 
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5.30 JOB 52 - CREATE STORE/FETCH FACILITY DATA SETS (NEW) 


Job ICMGEN52, produced only for new installations when Store/Fetch is 
specified or forced, copies the FAR parameters module FARPARMS from SYMREL to 
SYMUSR for use in the Intercomm execution job (job 90 - ddname ICOMIN), and creates 
the Store/Fetch default data set (INTSTORO) and, if MMU is specified, the Store/Fetch 
data sets needed for MMU processing (as specified via the MMUVTBL - see job 34). 


For single region systems, the name(s) of the data set(s) created is(are) 
INT.INTSTORO (also INT.INTSTOR2 and INT.INTSTOR3, if MMU is specified), whereas 
for Multiregion Intercomm systems, the names of the data sets created are of the form 
INT.region-id.INTSTORO (also INT.region-id.INTSTOR2 and INT.region-id.INTSTOR3 if 
MMU is specified), where region-ids are CR, SR1 and SR2. If the P parameter is coded 
on the ICOMGEN macro, that value is used instead of the default prefix INT. See 


store/Fetch Facility and Message Mapping Utilities. FAR parameters, which provide 
special processing attributes for selected files, are described in Chapter 6 of the 


Operating Reference Manual. 
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For Single Region: 


//ICMGEN52 JOB ICOM, GENICOM, CLASS=A 

//* 

//* CREATE STORE/FETCH DATA SET(S) 

//* 

//* INTSTORO - DEFAULT STORE/FETCH DATASET 

//* INTSTOR2 - MMU MAP DEFINITIONS 

//*  INTSTOR3 - MMU WORK FILE 

//* 

//* COPY FARPARMS TO SYMUSR (FIRST TIME ONLY) 

//* SPECIFIES  INTSTORO, ICOMBDAMXCTRL 

/{* 

//S10 EXEC PGM=IEBUPDTE 

//SYSPRINT DD SYSOUT=A 

//SYSUT1 DD DSN=INT.SYMREL,DISP=OLD 

//SYSUT2 DD DSN=INT.SYMUSR,DISP=OLD 

//SYSIN DD * 

./ REPRO NAME=FARPARMS 

./ ENDUP 

/* 

//S20 EXEC PGM=KEYCREAT \ 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//INTKEYFL DD DSN=INT.INTSTOR2, 

// DISP=(,CATLG,DELETE) , 

// VOL=SER=INT001,UNIT=SYSDA, SPACE=(CYL, (5)), 
// DCB= (DSORG=DA , BLKSIZE=1000 , RECFM=F , KEYLEN=52) 
//S30 EXEC PGM=KEYCREAT 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//INTKEYFL DD DSN=INT.INTSTOR3, 

// DISP=(,CATLG,DELETE) , 

// VOL=SER=INTO01,UNIT=SYSDA, SPACE=(CYL, (5)), 
// DCB= (DSORG=DA , BLKSIZE=2440 , RECFM=F , KEYLEN=52) 
//S40 EXEC PGM=KEYCREAT 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//INTKEYFL DD DSN=INT.INTSTORO, 

// DISP=(,CATLG,DELETE) , 

// VOL=SER=INTOO1,UNIT=SYSDA, SPACE= (CYL, (5)), 
// DCB= (DSORG=DA, BLKSIZE=2440 , RECFM=F , KEYLEN=52) 
// 
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For Multiregion: 


//ICMGEN52 #£JOB ICOM, GENICOM, CLASS=A 
//* 

//* CREATE STORE/FETCH DATA SET(S) 

//* 

//* INTSTORO - DEFAULT STORE/FETCH DATASET 

//* INTSTOR2 - MMU MAP DEFINITIONS 

//* INTSTOR3 - MMU WORK FILE 

//* 

//* COPY FARPARMS TO SYMUSR (FIRST TIME ONLY) 

//* SPECIFIES INTSTORO, ICOMBDAMXCTRL 

//* 

//810 EXEC PGM=IEBUPDTE 

//SYSPRINT DD SYSOUT=A 

//SYSUT1 DD DSN=INT.SYMREL,DISP=OLD 

//SYSUT2 DD DSN=INT.SYMUSR,DISP=OLD 

//SYSIN DD * 

./ REPRO NAME=FARPARMS 

./ ENDUP 

/* 

//S20 EXEC PGM=KEYCREAT 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//INTKEYFL DD DSN=INT.CR.INTSTOR2, 

// DISP=(,CATLG,DELETE) , 

// VOL=SER=INT001 ,UNIT=SYSDA, SPACE=(CYL, (5)), 
// DCB= (DSORG=DA , BLKSIZE=1000 , RECFM=F , KEYLEN=52) 
//S30 EXEC PGM=KEYCREAT 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//INTKEYFL DD DSN=INT.CR.INTSTOR3, 

// DISP=(,CATLG,DELETE) , 

// VOL=SER=INTO01 ,UNIT=SYSDA,SPACE= (CYL, (5)), 
//S40 EXEC PGM=KEYCREAT 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//INTKEYFL DD DSN=INT.CR.INTSTORO, 

// DISP=(,CATLG,DELETE) , 

// VOL=SER=INT001,UNIT=SYSDA, SPACE=(CYL, (5)), 
// DCB= (DSORG=DA , BLKSIZE=2440 , RECFM=F , KEYLEN=52) 


(continued) 
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Multiregion Job 52 continued: 


ie 


//* 

//s50 
//STEPLIB 
//INTKEYFL 
// 

// 

// 

//S60 
//STEPLIB 
/ /INTKEYFL 
// 

// 

// 

//S70 
//STEPLIB 
/ /INTKEYFL 
// 

// 

// 

//S80 
//STEPLIB 
/ /INTKEYFL 
// 

// 

// 

//890 
//STEPLIB 
/ /INTKEYFL 
// 

// 

// 

//8100 
//STEPLIB 
//INTKEYFL 
// 
// 
// 
// 


//* S/F DATA SETS FOR SATELLITE REGION(S) 


EXEC PGM=KEYCREAT 
DD DSN=INT .MODREL,DISP=SHR 
DD DSN=INT.SR1.INTSTOR2, 
DISP=(,CATLG,DELETE) , 
VOL=SER=INT001 , UNIT=SYSDA, SPACE= (CYL, (5)), 
DCB= (DSORG=DA , BLKSIZE=1000, RECFM=F , KEYLEN=52) 
EXEC PGM=KEYCREAT 
DD DSN=INT.MODREL,DISP=SHR 
DD DSN=INT.SR2.INTSTOR2, 
DISP=(,CATLG,DELETE) , 
VOL=SER=INTO001 , UNIT=SYSDA, SPACE= (CYL, (5)), 
DCB= (DSORG=DA , BLKSIZE=1000 ,RECFM=F , KEYLEN=52) 
EXEC PGM=KEYCREAT 
DD DSN=INT.MODREL,DISP=SHR 
DD DSN=INT.SR1.INTSTOR3, 
DISP=(,CATLG,DELETE) , 
VOL=SER=INT001 , UNIT=SYSDA, SPACE=(CYL, (5)), 
DCB= (DSORG=DA , BLKSIZE=2440 , RECFM=F , KEYLEN=52) 
EXEC PGM=KEYCREAT 
DD DSN=INT.MODREL,DISP=SHR 
DD DSN=INT.SR2.INTSTOR3, 
DISP=(,CATLG,DELETE) , 
VOL=SER=INT001,UNIT=SYSDA, SPACE=(CYL, (5)), 
DCB= (DSORG=DA , BLKSIZE=2440 , RECFM=F , KEYLEN=52) 
EXEC PGM=KEYCREAT 
DD DSN=INT.MODREL,DISP=SHR 
DD DSN=INT.SR1.INTSTORO, 
DISP=(,CATLG,DELETE) , 
VOL=SER=INTO01,UNIT=SYSDA, SPACE=(CYL, (5)), 
DCB= (DSORG=DA, BLKSIZE=2440 ,RECFM=F , KEYLEN=52) 
EXEC PGM=KEYCREAT 
DD DSN=INT.MODREL,DISP=SHR 
DD DSN=INT.SR2.INTSTORO, 
DISP=(,CATLG,DELETE) , 
VOL=SER=INT001, UNIT=SYSDA,SPACE= (CYL, (5)), 
DCB= (DSORG=DA , BLKSIZE=2440 , RECFM=F , KEYLEN=52) 
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5.31 JOB 54 - CREATE SUBSYSTEM DISK QUEUE DATA SET (NEW) 


Job ICMGEN54, produced only for new installations, creates one subsystem disk 
queue data set named INT.SSQUEUE if a single region system, or one for each region: 
INT.CR.SSQUEUE, INT.SR1.SSQUEUE and INT.SR2.SSQUEUE if a Multiregion 
Intercomm system. This is the data set referenced by the ddname PMIQUE on 
SYCTTBL macros coded in the module INTSCT on SYMREL (see also job 90). If the P 
parameter is coded on the ICOMGEN macro, that value is used instead of the default 
prefix INT. See Chapter 3 of the Operating Reference Manual. 


For Single Region: 


//ICMGENS4 JOB ICOM, GENICOM, CLASS=A 

//* 

//* CREATE SUBSYSTEM DISK QUEUE DATA SET(S) 
//* "PMIQUE" DDNAME IN EXEC JCL 

//* 

//S810 EXEC PGM=CREATEGF 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 


//SYSPRINT DD SYSOUT=A 

//SSQCR DD DSN=INT.SSQUEUE ,DISP=(,CATLG,DELETE) , 

// VOL=SER=INTO01,UNIT=SYSDA, SPACE= (2048, (800)), 
// DCB= (DSORG=DA , BLKSIZE=2048) 

//SYSIN DD * 

F SSOCR 0800 

// 


For Multiregion: 


/ /ICMGENSA4 JOB ICOM, GENICOM, CLASS=A 

//* 

//* CREATE SUBSYSTEM DISK QUEUE DATA SET(S) 

//* "PMIQUE" DDNAME IN EXEC JCL 

/{* 

//S10 EXEC PGM=CREATEGF 

//STEPLIB DD DSN=INT.MODREL,DISP=SHR 

//SYSPRINT DD SYSOUT=A 

//SSQCR DD DSN=INT.CR.SSQUEUE ,DISP=(,CATLG,DELETE) , 
VOL=SER=INT001,UNIT=SYSDA, SPACE= (2048, (800)), 
DCB= (DSORG=DA , BLKSIZE=2048) 
DSN=INT.SR1.SSQUEUE ,DISP=(,CATLG,DELETE) , 
VOL=SER=INT001 , UNIT=SYSDA, SPACE= (2048, (800)), 
DCB= (DSORG=DA , BLKSIZE=2048) 
DSN=INT.SR2.SSQUEUE ,DISP=(,CATLG,DELETE) , 
VOL=SER=INTO01 , UNIT=SYSDA, SPACE= (2048, (800)), 
DCB= (DSORG=DA , BLKSIZE=2048) 

//SYSIN DD * 

F SSQCR 0800 

F SSQSR1 0800 

F SSQSR2 0800 

// 
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5.32 JOB 56 - CREATE TERMINAL DISK QUEVE DATA SET (NEW) 


Job ICMGEN56, produced only for new installations, creates the BTAM and/or 
VTAM terminal disk queue data sets: BTAMQ and/or VTAMQ. If the P parameter is 
coded on the ICOMGEN macro, that value is used instead of the default prefix INT. See 


BTAM Terminal Support Guide and SNA Terminal Support Guide. 


//ICMGEN56 JOB ICOM, GENICOM, CLASS=A 
//* 
//* CREATE TERMINAL DISK QUEUE DATA  SET(S) 
//* "BTAMO" AND/OR "VTAMQ" DDNAME IN EXEC JCL 
//* 
//S10 EXEC PGM=CREATEGF 
//STEPLIB DD DSN=INT.MODREL,DISP=SHR 
//SYSPRINT DD SYSOUT=A 
DD DSN=INT.BTAMQ,DISP=(,CATLG,DELETE) , 
VOL=SER=INT001 , UNIT=SYSDA, SPACE= (4096, (800)), 


DCB= (DSORG=DA , BLKSIZE=4096) 

DD DSN=INT.VTAMO,DISP=(,CATLG,DELETE) , 
VOL=SER=INT001,UNIT=SYSDA, SPACE= (4096, (800)), 
DCB= (DSORG=DA , BLKSIZE=4096) 

DD * 
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5.33 JOB 58 -LOAD RCTO00 DATA SET (NEW/OLD) 


Job ICMGENS58, which is always produced, creates and loads (via the Intercomm 
utility PMIEXLD) the RCTOOO data set. If the P parameter is coded on the ICOMGEN 
macro, that value is used instead of the default prefix INT. This data set will contain the 
OFTs used by the Output Utility for Intercomm system processing (members RPT00001- 
RPTO0050). For an existing installation, user-coded OFTs (RPT00051 and up) may then 
be loaded to this data set using the partial file load option of PMIEXLD as described in 
Chapter 12 of the Operating Reference Manual. If necessary, increase the space or 
block size parameters before executing this job. 


NOTE: if the BLKSIZE of RCTOO0 is increased (may not be smaller), change the 
coding of the corresponding GENFTBLE macro in PMIFILET (see the 
Operating Reference Manual) and reassemble and relink it (see job 34). 
Then, relink PMIEXLD (see job 36) before executing this job. 


/ /ICMGENS58 JOB *COM, GENICOM, CLASS=A 


CREATE AND LOAD RCTOOOQ DATA SET 


EXEC PGM=PMIEXLD , PARM= (NOCHECK) 
//STEPLIB DD DSN=INT.MODLIB,DISP=SHR 
//RCTOOO DD DSN=INT.RCTOOO,DISP=(,CATLG,DELETE), 
UNIT=SYSDA , VOL=SER=INTOO1, 
SPACE=(TRK, (5,1) ,RLSE), 
DCB= (DSORG=PS , BLKSIZE=2048 , RECFM=F) 
//RCTLOAD DD DSN=INT.MODREL,DISP=SHR 
//SYSPRINT DD SYSOUT=A 
//SYSIN DD * 
RCTOOO 
/* 
// 
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9.34 JOB 60-ASSEMBLE DL/| DEPENDENT MODULES (NEW/OLD) 


Job ICMGEN6O, produced only if the DL/I data base interface is specified and the 
&DLI global in SETGLOBE is set to 1, causes the conditional reassembly and relink of 
the checkpoint/restart modules CHCKPTSS, DBCHKDSP and DBRSTRT, and of the 
control command module CPLUNCSS. See DBMS Users Guide. 


/ /ICMGEN60 JOB ICOM, GENICOM, CLASS=A 

//* 

//*  CHECKPOINT/RESTART MODULES WHEN DL/I USED 

//* 

//S10 EXEC ASMPCL, P='INT' ,Q=LIB,NAME=CHCKPTSS , LMOD=CHCKPTSS 
//ASM.SYSIN DD DSN=&P..SYMREL(SNAME) , DISP=SHR 

//S20 EXEC ASMPCL,P='INT!' ,Q=LIB,NAME=DBCHKDSP , LMOD=DBCHKDSP 


//ASM.SYSIN DD DSN=&SP. .SYMREL(&NAME) , DISP=SHR 

//S30 EXEC ASMPCL,P='INT' ,Q=LIB,NAME=DBRSTRT,LMOD=DBRSTRT 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

//S40 EXEC ASMPCL, P='INT' ,Q=LIB,NAME=CPLUNCSS , LMOD=CPLUNCSS 
//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) ,DISP=SHR 

// 
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5.35 JOB 62 -ASSEMBLE TOTAL DBMS FILE TABLE (NEW/OLD) 


Job ICMGEN62, produced only if the TOTAL data base interface is specified, 
causes the assembly and linkedit of the TOTAL file table (generated via the TOTFLGEN 
macro) called TOTFILE, which must be precoded and placed on SYMUSR. If different 
versions are used for several regions, each must be coded and assembled under 
different names and the Intercomm linkedit must be correspondingly modified. In 
addition, INCLUDE statements for CINCOM-supplied modules applicable to the user 
installation must be added to the Intercomm linkedit generated by job 80. See DBMS 
Users Guide. 


/ /ICMGEN62 JOB ICOM, GENICOM, CLASS=A 


ASSEMBLE TOTAL FILE TABLE 


//S10 EXEC ASMPCL, P='INT' ,Q=USR,NAME=TOTFILE , LMOD=TOTFILE 
// 
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5.36 JOB 70 - INSTALL LINK PACK FACILITY (NEW/OLD) 


Job ICMGEN70O, produced only if the Link Pack Facility is specified, causes the 
assembly and linkedit (as reentrant) of all Link Pack eligible modules BLMSGCOL, 
PMIRETRV, PMINQDEQ, PMIEXTRM, CONVERSE, IXFHNDO1, IXFB37, and if using 
MMU: MAPIN, MAPOUT, MMUTRTS, MMUEDO01, MMUEDO02, MMUEDOC3, 
MMUEDO008, LOGCHARS, MMUDDM, MMUDDMU, MMUDDMX, MMUDDMT (if using 
Data Speed 40), MMUDDMM, MMUCOMM, LMAP; and if using DDQ (or forced) 
DDQMOD,; and if using Store Fetch (or forced) INTSTORF; and if using Vsam (for Cross 
Region sharing) IXFVSCRS; and if using File Recovery (or forced) IXFLOG; and if using 
Dynamic File Allocation IXFDYNAM; and if using the Edit Utility PMIEDIT, PMIFIXED, 
EDIT3270 (if using 3270s); and if using the Output Utility PMIOUTPT, PMIVMIS56 (if using 
3270s); and if using Change/Display Utilities CHANGE, FORMAT, CRUNCH, DISPLAY. 


If using the OUTPUT utility only in the Control Region, delete the ASMPCL steps 
for PMIOUTPT and PMIVMI56 and ensure they are in the Control Region linkedit, not the 
LPSPA linkedit. Also delete the OUTPUT parameter for the ASMPCL of LPSPA and 
LPINTFC (see //ASM.SYSIN on page 5-52). 


Once all required Link Pack eligible modules have been linked as reentrant, an 
assembly and link of the LPSPA is done, including the desired modules in the linkedit 
step, to create the LPSPA load module. LPSPA is linkedited as reentrant (see the 
Operating Reference Manual for additional MVS system requirements). LPSPA must be 
in the PLPA not the EPLPA. The final step in this job assembles and links the LPINTFC 
module which sets up addressability to the modules included in the LPSPA. 


In the Intercomm execution JCL, the data set on which the LPSPA is assumed to 
reside (DD statement LPSPALIB) is 'SYS1.LPALIB' (default). If this is not the data set on 
which LPSPA resides and the LPALIB parameter on the ICOMGEN macro was not 
coded to override the default, then it will be necessary to manually correct the name of 
the data set generated in job 90. 


//ICMGEN70 JOB ICOM, GENICOM, CLASS=A 
//* 


//* WINK PACK FACILITY INSTALLATION 
ASSEMBLE AND LINK ELIGIBLE MODULES AS REENTRANT 


ASMPCL, P='INT' ,Q=LIB, NAME=BLMSGCOL , LMOD=BLMSGCOL, 
RENT=RENT 
DD DSN=&P..SYMREL(S&NAME) , DISP=SHR 
ASMPCL , P='INT' ,Q=LIB, NAME=PMIRETRV , LMOD=PMIRETRV, 
RENT=RENT 
DD DSN=6&P. . SYMREL (&NAME) , DISP=SHR 
ASMPCL, P='INT' ,Q=LIB,NAME=PMINQDEQ , LMOD=PMINOQDEQ, 
RENT=RENT 

//ASM.SYSIN DD DSN=6&P..SYMREL(&NAME) , DISP=SHR 

//S8 EXEC ASMPCL, P='INT' ,Q=LIB,NAME=MAPIN, LMOD=MAPIN, 

/f RENT=RENT 

//ASM.SYSIN DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 
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ASMPCL, P='INT' ,Q=LIB,NAME=MAPOUT , LMOD=MAPOUT, 
RENT=RENT 

DD DSN=&P. .SYMREL (&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=MMUTRTS , LMOD=MMUTRTS, 
RENT=RENT 

DD DSN=&P. . SYMREL (&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=MMUEDO01 , LMOD=MMUEDOO1, 
RENT=RENT 

DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' , Q=LIB, NAME=MMUED002 , LMOD=MMUEDO02, 
RENT=RENT 

DD DSN=&P..SYMREL (&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=MMUED003 , LMOD=MMUEDO03, 
RENT=RENT 

DD DSN=&P. .SYMREL (&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=MMUED008 , LMOD=MMUEDOO8, 
RENT=RENT 

DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=LOGCHARS , LMOD=LOGCHARS, 
RENT=RENT 

DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=MMUDDM, LMOD=MMUDDM, 
RENT=RENT 

DD DSN=&P..SYMREL (&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=MMUDDMU , LMOD=MMUDDMU , 
RENT=RENT 

DD DSN=&P. .SYMREL (&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=MMUDDMX , LMOD=MMUDDMX, 
RENT=RENT 

DD DSN=&P.. SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=MMUDDMT , LMOD=MMUDDMT, 
RENT=RENT 

DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB ,NAME=MMUDDMM , LMOD=MMUDDMM, 
RENT=RENT 

DD DSN=&P..SYMREL (&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=LMAP , LMOD=LMAP, 
RENT=RENT 

DD DSN=&P..SYMREL (&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=MMUCOMM, LMOD=MMUCOMM, 
RENT=RENT 

DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL , P='INT' ,Q=LIB,NAME=PMIEXTRM, LMOD=PMIEXTRM, 
RENT=RENT 

DD DSN=&P..SYMREL (&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=CONVERSE , LMOD=CONVERSE, 
RENT=RENT 

DD DSN=&P. .SYMREL (&NAME) , DISP=SHR 
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ASMPCL, P='INT' ,Q=LIB,NAME=DDQMOD , LMOD=DDOMOD, 
RENT=RENT 

DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=INTSTORF , LMOD=INTSTORF, 
RENT=RENT 

DD DSN=&P. . SYMREL (&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=IXFVSCRS , LMOD=IXFVSCRS, 
RENT=RENT 

DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=IXFLOG, LMOD=IXFLOG, 
RENT=RENT 

DD DSN=&P..SYMREL (&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=IXFHNDO1,LMOD=IXFHNDO1, 
RENT=RENT 

DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=IXFDYNAM, LMOD=IXFDYNAM, 
RENT=RENT 

DD DSN=&P..SYMREL(&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=IXFB37 , LMOD=IXFB37, 


RENT=RENT 


. SYSIN 
EXEC 


DD DSN=&P. . SYMREL (&NAME) , DISP=SHR 
ASMPCL , P='INT' ,Q=LIB,NAME=PMIEDIT , LMOD=PMIEDIT, 
RENT=RENT 

DD DSN=&P..SYMREL (&NAME) , DISP=SHR 

ASMPCL , P='INT' ,Q=LIB,NAME=PMIFIXED , LMOD=PMIFIXED, 
RENT=RENT 

DD DSN=&P. .SYMREL (SNAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=EDIT3270 , LMOD=EDIT3270, 
RENT=RENT 

DD DSN=&P. . SYMREL (&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=PMIOUTPT , LMOD=PMIOUTPT, 
RENT=RENT 

DD DSN=&P. . SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=PMIVMI56 , LMOD=PMIVMI56, 
RENT=RENT 

DD DSN=&P..SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=CHANGE , LMOD=CHANGE, 
RENT=RENT 

DD DSN=&P. .SYMREL(&NAME) , DISP=SHR 

ASMPCL, P='INT' ,Q=LIB, NAME=FORMAT , LMOD=FORMAT, 
RENT=RENT 

DD DSN=&P. . SYMREL (&NAME) , DISP=SHR 

ASMPCL , P='INT' , Q=LIB, NAME=CRUNCH , LMOD=CRUNCH, 
RENT=RENT 

DD DSN=&P..SYMREL (&NAME) ,DISP=SHR 

ASMPCL, P='INT' ,Q=LIB,NAME=DISPLAY , LMOD=DISPLAY, 
RENT=RENT 

DD DSN=&P. . SYMREL (&NAME) ,DISP=SHR 
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//* ASSEMBLE + LINK LPSPA USING LPSPA MACRO 
//* TO THE SYSTEM LOAD LIBRARY 
//* 


//S74 EXEC ASMPCL, P='INT' ,Q=LIB, LMOD=LPSPA, 
RENT=RENT 


// 


//ASM.SYSIN DD 


/* 


LPENTRY 
LPENTRY 


* 
LMAP, SCT, , SSC=M, SSCH=L 
MMUCOMM, SCT, , SSC=M, SSCH=M 


LPSPA A=A,MODS=(MSGCOL, RTRVER, 
EDIT, 
OUTPUT, 
CHGDIS, 
FILHNDQI, 
SFETCH, 
DDQ, 
MMU, 
DFA, 
PMIEXTRM, NQDEQ , CONVERSE) 


END 


//LKED.SYSLMOD DD DSN=SYS1.LPALIB(&LMOD) , DISP=SHR 
//LKED.SYSIN 


/* 
//* 
//* 


INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
.NCLUDE 


DD * 

SYSLIB (BLMSGCOL , PMIRETRV) 
SYSLIB (PMIEDIT, PMIFIXED) 
SYSLIB (EDIT3270) 

SYSLIB (PMIOUTPT) 

SYSLIB (PMIVMIS6) 


CHANGE GET (GETZ) IXFQISAM USED 
CHANGE PUT (PUTZ) IXFQISAM USED 


INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
INCLUDE 
ENTRY 
NAME 


SYSLIB (IXFHNDO1) 

SYSLIB (IXFVSCRS) 

SYSLIB (IXFB37) 

SYSLIB (IXFLOG) 

SYSLIB (IXFDYNAM) 

SYSLIB (CHANGE) 

SYSLIB (FORMAT, CRUNCH) 

SYSLIB (DISPLAY) 

SYSLIB (INTSTORF) 

SYSLIB (DDQMOD) 

SYSLIB (MAPIN , MAPOUT, MMUEDO01) 
SYSLIB (MMUEDO02 , MMUED003, MMUEDO08) 
SYSLIB (LOGCHARS , MMUDDM, MMUDDMU) 
SYSLIB (MMUDDMX) 

SYSLIB (MMUDDMT) 

SYSLIB (MMUDDMM, MMUTRTS) 
SYSLIB (LMAP ,MMUCOMM) 

SYSLIB (PMIEXTRM, PMINQDEQ , CONVERSE) 
LPSPA 

LPSPA (R) 


ASSEMBLE + LINK LPINTFC USING LPINTFC MACRO 


//S76 EXEC ASMPCL, P='INT' ,Q=USR, LMOD=LPINTFC 
//ASM.SYSIN DD 


LPINTFC 


* 
MODS= (MSGCOL, RTRVER, 


EDIT, 


OUTPUT, 
CHGDIS, 
FILHNDQI, 
SFETCH, 
DDQ, 
MMU, 
DFA, 
PMIEXTRM , NQDEQ, CONVERSE) 
END 
// 
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5.37 JOB 78 - ALLOCATE SYMINCL LINKEDIT LIBRARY (NEW/OLD) 


Job ICMGEN78, which is always produced, allocates a source library to contain 
linkedit decks (contro! statements) for the user installation. This step is necessary if the 
linkage editor (not the binder under DFSMS) is used, due to linkage editor restrictions on 
the maximum input library block size (3200). The allocated block size is optimized for 
3380 and 3390 disk packs. If the DFSMS binder is used to linkedit Intercomm, then a 
larger blocksize may be used - change the DCB BLKSIZE value before executing this 
job. 


This linkedit control statements library is used to contain the output of job 80 
resulting from assembly of the ICOMLINK macro, and is input to job 85 to linkedit the 
Intercomm load module(s). 


/ /ICMGEN78 JOB ICOM, GENICOM, CLASS=A 
ALLOCATE LINKEDIT INCLUDE LIBRARY 


//S10 EXEC PGM=IEFBR14 


//SINC DD DSN=INT.SYMINCL ,DISP=(,CATLG) , 
SPACE=(CYL, (2,1,10)), 
UNIT=SYSDA , VOL=SER=INTOO1, 

DCB= (DSORG=PO , RECFM=FB , BLKSIZE=3120 , LRECL=80) 
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5.38 JOB 80 - GENERATE INTERCOMM LINKEDIT DECK (NEW/OLD) 


Job ICMGEN80, which is always produced, generates the Intercomm linkedit 
"deck", that is, the linkedit control INCLUDE (and OVERLAY, if OVLYSTR=YES) 
statements for linkediting the on-line Intercomm execution load module via assembly of a 
generated ICOMLINK macro with parameters coded according to ICOMGEN macro 
specifications. The generated linkedit control statements are placed on SYMINCL as 
member ILINKCR (for a single region Intercomm system or the control region of a 
Multiregion system). In addition, if a Multiregion system is specified, linkedit decks for 
satellite regions 1 and 2 are placed on SYMINCL as members ILINKSR1 and ILINKSR2. 
Considerations for user modification of the linkedit statements are described under 
preceding jobs and for job 85. 


In generating the ICOMLINK macro coding for execution of this job, the defaults 
are assumed for the following ICOMLINK macro parameters: DEBUG, LIBR, LOOPTIM, 
MONOVLY and USRSTART. See Basic System Macros. If other than the default is 
needed, add the desired parameters to the generated ICOMLINK statements before 
executing this job. To generate a Test Mode linkedit, add the statement TEST=YES. 
See the Operating Reference Manual for further considerations for Test Mode 
installation. If the Generalized Front End Facility (GFE) was used in a previous 
Intercomm installation for other then the Extended TCAM Front End, modify the GFE 
parameter to force include statements for user-coded interface modules, or add them to 
the generated linkedit deck before executing job 85. If single region logging is desired 
for a Multiregion system (see Multiregion Facility), modify the generated ICOMLINK 
macro MULTREG parameter statements accordingly. 


In a Multiregion environment, if using the Output Utility only in the Control Region, 
change the UTILITY parameter for the ICOMLINK macros for Satellite Region linkedits to 
omit the OUTPUT subparameter; that is, code the specific utility subparameters desired 
(in parentheses) such as EDIT, and/or PAGE. If there are no user subsystems in the 
Control Region, change all COBOL and PL1 parameters to NO, delete the DBASE 
parameter, ensure DYNLOAD=NO (but leave DYNLINK=YES), and check the other 
parameters. 


Before proceeding with this job and jobs 85 and 90, the user should read Chapter 
7 of the Operating Reference Manual which describes the Intercomm linkedit, on-line 
execution, MVS installation considerations, and related facilities. 


NOTE: even if dynamic linkedit (for dynamically loaded subsystems and 
subroutines) is not needed, DYNLINK=YES should be coded to force an 
INCLUDE of ICOMDYNL to build a sorted 31-Amode NAME/ADDRESS 
table which is used by the SCTL system control command (which 
replaces TBUG functions - if used in earlier releases). DYNLOAD=YES 
is no longer required if DYNLINK=YES. Ensure DYNLOAD=NO is coded 
if there are no dynamically loaded subsystems or subroutines in a 
specific region. 
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/ /ICMGEN80 

//* 

//* PRODUCE INTERCOMM LINKEDIT (ICOMLINK) DECK(S) 

//* 

//* CONTROL REGION ONLY 

//* 

//S10 EXEC ASMPC,DECK=DECK, P='INT' ,Q=USR,NAME=LDECKCR 

//ASM.SYSIN DD * 

ICOMLINK ASYNCH=NO, 

AUTOGEN=NO, 
CHKRES=YES, 
COBOL=YES, 
DATAENT=NO, 
DBASE=(TOTAL,UPD) , 
DBLIBR=SYSLIB, 
DDQ=YES, 
DFA=YES, 
DSCT=IXFDSCT1, 
DYNLINK=YES, 
DYNLOAD=YES, 
DYNPOOL=NO, 
FETABLE=FENETWRK, 
FILEREC=YES, 
FILSTAT=YES, 
GFE=YES, 
GPSS=YES, 
LPSPA=NO, 
MMU=YES, 
MULTREG=CONTROL , 
OVLYSTR=NO, 
PL1=YES, 
RECOBOL=YES, 
SAM=YES, 
SECUR=ESS, 
STORFCH=YES, 
TRANS=NO, 
DYNVERB=NO, 
UTILITY=ALL, 
LU62=ACTIVE, 
VTAM=YES, 
COBOL2=YES 


JOB ICOM , GENICOM, CLASS=A 


+ t+ £¢ £ + + + + + + FF F HF HF H HH + HF + HF + + F 4 H HH H HF H FH 


END 
//SYSPUNCH DD DSN=INT.SYMINCL(ILINKCR) ,DISP=SHR 
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//* 

//* SATELLITE REGION 1 

//* 

//S20 EXEC ASMPC,DECK=DECK, P='INT' ,Q=USR,NAME=LDECKSR1 

//ASM.SYSIN DD * 

ICOMLINK AS¥NCH=NO, 
AUTOGEN=NO, 
BACKOUT=YES, 
CHKRES=YES, 
COBOL=YES, 
DATAENT=NO , 
DBASE=(TOTAL, UPD) , 
DBLIBR=SYSLIB, 
DDQ=YES, 
DFA=YES, 
DSCT=IXFDSCT1, 
DYNLINK=YES, 
DYNLOAD=YES , 
DYNPOOL=NO , 
FILEREC=YES, 
FILSTAT=YES, 
GPSS=YES, 
LPSPA=NO, 
=YES, 

MULTREG=SATLITE, 
OVLYSTR=NO, 
PL1=YES, 
RECOBOL=YES, 
SAM=YES , 
SECUR=ESS, 
STORFCH=YES, 
TRANS=NO, 
UTILITY=ALL, 
LU62=ACTIVE, 
COBOL2=YES 


* 
* 
* 
* 
*® 
x 
*® 
x 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 
* 


END 
//SYSPUNCH DD DSN=INT.SYMINCL(ILINKSR1) ,DISP=SHR 
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//* 

//* SATELLITE REGION 2 

//* 

//S30 EXEC ASMPC,DECK=DECK, P='INT' ,Q=USR,NAME=LDECKSR2 

//ASM.SYSIN DD * 

ICOMLINK ASYNCH=NO, 

AUTOGEN=NO, 
CHKRES=YES, 
COBOL=YES, 
DATAENT=NO , 
DBASE= (TOTAL, UPD) , 
DBLIBR=SYSLIB, 
DDQ=YES, 
DFA=YES, 
DSCT=IXFDSCT1, 
DYNLINK=YES, 
DYNLOAD=YES, 
DYNPOOL=NO, 
FILEREC=YES, 
FILSTAT=YES, 
GPSS=YES, 
LPSPA=NO, 
MMU=YES, 
MULTREG=SATLITE, 
OVLYSTR=NO, 
PLI=YES, 
RECOBOL=YES, 
SAM=YES, 
SECUR=ESS, 
STORFCH=YES, 
TRANS=NO, 
UTILITY=ALL, 
LU62=ACTIVE, 
COBOL2=YES 


+ + + +t FF HF HH H FH HF HF HF HF HF F HF F F HF H H HF KH 


END 


/* 
//SYSPUNCH DD DSN=INT.SYMINCL(ILINKSR2) ,DISP=SHR 
// 
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5.39 JOB 85 - LINKEDIT INTERCOMM LOAD MODULE (NEW/OLD) 


Job ICMGEN85, which is always produced, executes an Intercomm on-line 
system linkedit using the output of job 80. The load module names are ICOMCR (single 
region or control region), and ICOMSR1 and ICOMSR2 for satellite regions 1 and 2 if a 
Multiregion system is being generated. Before executing this job, the linkedit deck(s) 
produced by execution of job 80 may be modified to: 


e add MVS linkedit ORDER statements as described in the Operating 
Reference Manual, Chapter 7 (or copy them from existing linkedits), but omit 
ORDER statements for KEYFLIP and EXECWAIT (obsolete). Also omit 
ORDER statements for the NEWPOOLS Csects if the 24-Amode pools are to 
be loaded at startup. 


e add user exit modules 
e add user subsystems and subroutines which are not dynamically loaded 


e add subsystems and tables for Intercomm system: command processing 
which require special installation considerations as described in System 
Control Commands (note that the TUNERTBL and PAGETBLE are obsolete) 


e add Data Base access, and/or high-level language, support routines required 
by the user installation 


e add Intercomm special facility modules used by an existing installation, as 
necessary. 


lf a Multiregion Intercomm system is being generated, the user must also modify 
the INCLUDE statements for INTSPA and INTSCT to CRSPA and CRSCT in ILINKCR, 
to SR1SPA and SR1SCT in ILINKSR1, and to SR2SPA and SR2SCT in ILINKSR2. An 
existing installation may use other naming conventions, if desired. Also modify the 
statements for including the pools module (NEWPOOLS), REENTSBS, DDQDSTBL, and 
other region specific tables. 


The generated load module(s) are placed on MODUSR. For existing installations 
using a Multiregion system with more than two satellite regions, additional linkedits are 
necessary; use the generated ILINKSR2 control statements module as a base and 
modify the INCLUDE statements for INTSPA and INTSCT (SPA and SCT), the 
Intercomm pools module, etc., accordingly. 


Ensure that none of the libraries defined for STEPLIB when executing Intercomm 


contain any of the following load modules: MRMCT (if Multiregion used), LPSPA (if Link 
Pack Facility used), or SECVECT (if ESS used). 
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NOTE: some of the Release 9 and Release 10 modules have been deleted or 
incorporated in others; do not use the Release 9 or Release 10 linkedit 
for Release 11. New modules may be added; do not delete them from 
the ICOMLINK-generated Release 11 linkedit. 


If COBOL2=YES is coded, then the system COB2LIB (instead of 
COBLIB) is automatically concatenated for the linkedit step(s) below. 
Ensure that the COB2LIB is that used in the pre-Language Environment 
system. 


The concatenation of TELCMLIB for SYSLIB is omitted if BTAM is not 
used. 


Add other libraries to the SYSLIB concatenation if PL/1 support modules 
or Data Base support modules are to be included from SYSLIB. For 
PL/1, ensure the pre-Language Environment PLIBASE is used. 


//ICMGEN85 JOB ICOM, GENICOM, CLASS=A 
LEe 
//* UINKEDIT THE ON-LINE INTERCOMM SYSTEM 


EXEC LKEDP, P='INT' ,Q=USR ,LMOD=ICOMCR 
.SYSLIB DD 
DD 
DD 
DD 
DD DSN=SYS1.COBLIB, DISP=SHR 
DD DSN=SYS1.TELCMLIB,DISP=SHR 
. SYSIN DD DSN=INT.SYMINCL(ILINKCR) ,DISP=SHR 


EXEC LKEDP,P='INT' ,Q=USR, LMOD=ICOMSR1 
.-SYSLIB DD 
DD 
DD 
DD 
DD DSN=SYS1.COBLIB,DISP=SHR 
. SYSIN DD DSN=INT.SYMINCL (ILINKSR1) , DISP=SHR 


EXEC LKEDP,P='INT' ,Q=USR, LMOD=ICOMSR2 
. SYSLIB 


DSN=SYS1.COBLIB ,DISP=SHR 
DD DSN=INT.SYMINCL (ILINKSR2) ,DISP=SHR 
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5.40 JOB 90 - GENERATE INTERCOMM EXECUTION JCL (NEW/OLD) 


Job ICMGEN90, which is always produced, generates a sample procedure 
ICOMEXEC for executing an on-line Intercomm system and places it on the system 
PROCLIB. This procedure must be user modified to add system and user files unique to 
the installation, JCL for TP lines if executing with a BTAM Front End, etc. An existing 
installation should study the placement of and specifications for Intercomm JCL DD 
statements and modify existing JCL streams accordingly. Considerations for defining user 
data sets and FAR parameters are described in Chapter 6 of the Operating Reference 
Manual. EXEC parameters are provided for defining the load module name, region size, 
data set prefix id, execution mode, and FAR parameters module name on the SYMUSR 
data set (for ICOMIN DD statement). 


Note that if executing with a Multiregion system, and dynamic load libraries are 
used, the load library specified for DYNLLIB and as the first data set for STEPLIB must be 
unique to each region. Also, it may be necessary to create separate versions of this 
procedure for each region with unique user files. Front End queue data sets and TP lines 
JCL may not be present in satellite region JCL. Unique data sets for THREDLOG, 
CHEKPTFL, STRTUPSW, STATFILE, and SNAPDD (if spooling to disk) may be 
necessary in each region, if the corresponding feature is used. 


Before attempting to execute Intercomm, ensure that a systems programmer has 
relinked the MVS nucleus to include the Intercomm Interregion SVC, and has defined the 
PARMLIB members necessary to use the MRMCT and SECVECT tables (if Multiregion 
and/or ESS is used), and for the LPSPA (if the Link Pack Facility is used), and then that a 
system IPL has been done. 


On the following pages, two versions of job ICMGENS0 are illustrated. The first is 
for a single region Intercomm system with a VTAM Front End and the following non- 
default ICOMGEN options specified: LOG=TAPE, and DDQ=YES. The second version is 
for a Multiregion system with both a BTAM and a VTAM Front End and the following non- 
default options specified: BACKOUT=YES, FILSTAT=YES, LPSPA=YES, SECUR=ESS, 
and UTILITY=ALL. Note the generation of the execution parameter ILOGSER (to specify 
tape log volser numbers) on the first illustration, and of IMRSREG (to specify Multiregion 
region-id for data set name qualifiers) on the second illustration. 


NOTE: if the flip/flop facility for disk logging (see job 04) is used and DISP=SHR is coded 
on all log DD statements, LOGPRINT may be executed while Intercomm is 
running. 


DYNLWORK data set is no longer used for dynamic linkedit and the Page Facility 
data sets (PAGES) are no longer used. 


For STEPLIB concatenation, add DD statements for the system load libraries 
TELCMLIB (if BTAM used), the system COBLIB (if only OS/VVS or ANS COBOL 
used), and the pre-Language Environment version of COB2LIB (if VS COBOL Il 
used) or PLILINK (if PL/1 used), etc., following those for Intercomm libraries, in 
appropriate regions. 
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For Single Region: 


//ICMGENSO JOB ICOM, GENICOM, CLASS=A 
//* 
//* ADD INTERCOMM EXECUTION JCL TO SYSTEM PROCLIB 
//* 
//S810 EXEC PGM=IEBUPDTE 
//SYSPRINT DD SYSOUT=A 
//SYSUT1 DD DSN=SYS1.PROCLIB,DISP=SHR 
//SYSUT2 DD DSN=SYS1.PROCLIB,DISP=SHR 
//SYSIN DD DATA 
./ ADD NAME=ICOMEXEC , LIST=ALL 
./ NUMBER NEW1=100 , INCR=100 
//ICOMEXEC PROC IPROG=ICOMCR, 
IREGSIZ=1024K,P=INT, 
IPARM='STARTUP', 
ILOGSER=, 
FARPARM=FARPARMS 


[LER REKREEEEKRKEKKKEKKKE 


//* INTERCOMM * 

[ [EERE KKEEKEEKREKKEKEKEKKER 

/{* 

//* 

/ / ICOM EXEC PGM=&IPROG, 

// PARM=&IPARM, 

// REGION=SIREGSIZ 

//* 

[RRR RRR ERE KKK EEKEKREKKKK KKK KR KEK 
//* STEPLIB - * 


//* DYNLLIB DATA SET MUST BE FIRST IF USED * 
| [RRR RIKER REE ERE KEE KEKEKEEKKEKEKRKKKES 


//* 

//STEPLIB DSN=&P. .MODDYNL , DISP=SHR 
DSN=&P. .MODUSR, DISP=SHR 
DSN=&P..MODLIB,DISP=SHR 
DSN=&P. .MODREL, DISP=SHR 
DSN=&P. .MODMDF’ , DISP=SHR 


[LR RRR IKE KIKI KER KEKE EKER EEKEKEKKKEKKKKKKKKKE 


//* INTERCOMM LOG DATASET x 
| [RRR REIKI KIRKE EKER ERE KEKE KRKKKKKK KKK KES 


//* 

//INTERLOG DD DSN=&P..INTERLOG, 
UNIT=TAPE , LABEL=(,BLP) ,DISP=(NEW,KEEP) , 
VOL=SER=&ILOGSER, 
DCB= (DSORG=PS , BLKSIZE=4100 , RECFM=VB, 
LRECL=4096 , NCP=8 , OPTCD=C) 


(continued) 
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Single Region Job 90 continued: 


[LL RRR EKEKEKKKEEKEKKEEKKEEKKKKE 


//* SYSOUT DATASETS * 

[ [RRR REKKKEKKEEKEEKKEKRKEEKEKKEEKKKRKEKK KK KE 

//* 

//SMLOG DD SYSOUT=A, 

// DCB= (DSORG=PS , BLKSIZE=1200 , LRECL=120 , RECFM=FBA) 
//STSLOG DD SYSOUT=A, 

// DCB= (DSORG=PS , BLKSIZE=1200 , LRECL=120 , RECFM=FBA) 
//SYSPRINT DD SYSOUT=A, 

T7 DCB= (DSORG=PS , BLKSIZE=1374 , LRECL=137 , RECFM=VBA) 
//* 

[ [RRR KEKE KEKE EK KEKKEKKEKEEKEKKEKKERKKKK 

//* QUEUES - _ SUBSYSTEM/TERMINAL * 

LL RRR KKEEETKKE 

//* 

//PMIQUE DD DSN=&P..SSQUEUE,DISP=OLD, 

/f DCB= (DSORG=DA , OPTCD=RF) 

/ /VTAMQ DD DSN=&P..VTAMQ,DISP=OLD, 

// DCB= (DSORG=DA , OPTCD=RF) 

//* 

LL RRR KKEKEKKEKKEKKEEKKEEKKKKEKKKK KK 
//* INTERCOMM DATASETS * 
LL RRR RRR REE KKK EKER KEKE KKK EEKEKEKEKKAKK KEK KEKE 
//* 

//RCTOOO DD DSN=&P..RCTOOO,DISP=SHR, 

// DCB= (DSORG=DA , OPTCD=RF) 

//* 

Lf RRR RRR IKKE KHER KEE EKEEEKKEKKK KE KKK 
//* STORE/FETCH DATASETS * 
[ [BRERA KKK KEK 
//* 

//INTSTORO DD DSN=&P. .INTSTORO,DISP=OLD, 

// DCB= (DSORG=DA , OPTCD=EF , LIMCT=3) 
//INTSTOR2 DD DSN=&P. .INTSTOR2 ,DISP=SHR, 

// DCB= (DSORG=DA , OPTCD=EF , LIMCT=3) 
//INTSTOR3 DD DSN=&P. .INTSTOR3 ,DISP=OLD, 

// DCB= (DSORG=DA, OPTCD=EF , LIMCT=3) 

//* 

[ [REE RRKKKEKKKKKEKKKEKEKEKKEKEKKKK KKK KKK 

//* DDQ DATASETS * 

[ [RRR IKKE KEKE EKKKEEEKKKKKEKS 

//* 

//PMIQCFDD DD DSN=&SP..QCF,DISP=SHR, 

// DCB= (DSORG=DA, OPTCD=RFE , LIMCT=3) 
//PMISCFDD DD DSN=&SP..SCF,DISP=SHR, 

// DCB= (DSORG=DA , OPTCD=RF) 

//DDQDEF DD DSN=&P..DDQDEF,DISP=SHR, 


// DCB= (DSORG=DA , OPTCD=RF) 
//* 


(continued) 
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single Region Job 90 continued: 


//* ADD USER FILES HERE BEFORE PMISTOP DD 


hg 
//PMISTOP DD DUMMY 
fi 


/[* 


//* 


//* DYNLLIB - 
//* NOT SHAREABLE WITH OTHER REGIONS 


//* 
//DYNLLIB DD DSN=&P..MODDYNL,DISP=SHR 
[ [RRR KKEKKKARKKKKKKKKKKKKKKKKK 


//* DYNLINK DATASET * 
[ [REREKKKRKKKKKKAKKKKKKKKAKKKKRKKKKKKKKEKKKKKK 
//* 

//DYNLPRNT DD SYSOUT=A 

//* 

//SNAPDD DD SYSOUT=A,FREE=CLOSE, 

// SPACE= (CYL, (10) ) 

//SYSUDUMP DD DUMMY 

//* 

[[LRRRRKKKKKKKKKKKKKKK KK KEE 


//* LOGPRINT * 

[ [RRERKKKRAKKKEKKKKAEKKEKKKEKAEE 

//* 

//LOGPRINT EXEC PGM=LOGPRINT , COND=EVEN 
//STEPLIB DD DSN=&P..MODREL,DISP=SHR 
//SYSPRINT DD SYSOUT=A, 

yi DCB= (DSORG=PS , BLKSIZE=121) 
//SYSIN DD DUMMY ,DCB=BLKSIZE=80 

//* 


//* 

//INTERLOG DD DSN=&P..INTERLOG, 

// UNIT=TAPE , VOL=SER=&ILOGSER, 
// DCB=BLKSIZE=4100, 

// DISP= (OLD, KEEP , KEEP) 

// 
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[ [RRR EEEEKREKKKKKK KKK KKK KKK KKK KS 


[ [RRR KKKKKKKKKEKRKKKKKKKKKKRKKKKKKKKKKKKKK KK 


//* FILE ATTRIBUTE RECORD (FAR) PARAMETERS 


/ /ICOMIN DD DSN=&P. .SYMUSR (&SFARPARM) , DISP=SHR 


[ [RRR KKKKKKKKKKKKKKKEKKKKKKKKKKKKKKKKKKKK KKK KKK KKK KKK 


[ [RRR IKKE IKKE KEKE KEE EEK KK KKK KKK 


[ [RRR KHKKKKKKEKKKKKKE KEK KK KKK KKK KK KKK 


//* INTERCOMM LOG DATASET 
[ [RRR RK KEREEKEEEKKEKKKKKKKKKAKEK 


Installation JCL 


Chapter 5 Installation JCL 


For Multiregion: 


/ / ICMGENSO JOB ICOM, GENICOM , CLASS=A 

//* 

//* ADD INTERCOMM EXECUTION JCL TO SYSTEM PROCLIB 

//* 

//S810 EXEC PGM=IEBUPDTE 

//SYSPRINT DD SYSOUT=A 

//SYSUT1 DD DSN=SYS1.PROCLIB,DISP=SHR 

//SYSUT2 DD DSN=SYS1.PROCLIB,DISP=SHR 

//SYSIN DD DATA 

./ ADD NAME=ICOMEXEC, LIST=ALL 

./ NUMBER NEW1=100, INCR=100 

//ICOMEXEC PROC IPROG=ICOMCR, 
IREGSIZ=1024K, P=INT, 
IMRSREG=, 
IPARM='STARTUP', 
FARPARM=FARPARMS 


[ [RRR EEKEKEKEKKKKKKEKE 


//* INTERCOMM * 

[LL ERERREKKKKKKKKKRKE KKK KKK KEE 

//* 

//* 

//ICOM EXEC PGM=SIPROG, 

// PARM=&IPARM, 

// REGION=&SIREGSIZ 

//* 

[ [RRR KKK KAA ERE KKK 
//* STEPLIB - * 
//* DYNLLIB DATA SET MUST BE FIRST IF USED * 
[ [RRR RK RRR E KR KKEKEEEAEREKEREERKKKEKEKKEKKKS 
//* 

//STEPLIB DD DSN=6&P..&IMRSREG. .MODDYNL ,DISP=SHR 
// DD DSN=&P. .MODUSR,DISP=SHR 

// DD DSN=&P..MODLIB, DISP=SHR 

// DD DSN=&P..MODREL,DISP=SHR 

// DD DSN=&P..MODMDF,DISP=SHR 

//* 

//* 

LL RRR RHEE EKEE EEE EEEKEEKEKE 


//* INTERCOMM LOG DATASET * 
Lf BREE HK IKKE EERIE KIER KE KKK KEKE 
//* 
//INTERLOG DD DSN=6P..&IMRSREG. .INTERLOG, 
DISP=SHR, 
DCB= (DSORG=PS , BLKSIZE=4100, RECFM=VB, 
LRECL=4096 ,NCP=8 , OPTCD=C) 


(continued) 
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Multiregion Job 90 continued: 


LL RRR REE KEKE KEEKKKKKKKKKKKKE 


//* SYSOUT DATASETS * 
[ [RRR RK KKKEEKEEEKKKEKERKEKKKEKKKEK 
//* 
/ /SMLOG DD SYSOUT=A, 
// DCB= (DSORG=PS , BLKSIZE=1200 , LRECL=120 , RECFM=FBA) 
//STSLOG DD SYSOUT=A, 
DCB= (DSORG=PS , BLKSIZE=1200 , LRECL=120 , RECFM=FBA) 
DD SYSOUT=A, 
DCB= (DSORG=PS , BLKSIZE=1200 , LRECL=120 , RECFM=FBA) 
DD SYSOUT=A, 
DCB= (DSORG=PS , BLKSIZE=1374 , LRECL=137 , RECFM=VBA) 


[ [REIKI RK KEKE KKK RAKE RE REEEKEKKEKKKKEKS 


//* QUEUES - _ SUBSYSTEM/TERMINAL * 

[LL RERRRKRE KKK EKEEKEKEKEKEKEKKEKEKEKKKKKKKEKKKKKK 

/{* 

/ /PMIQUE DD DSN=&P..&IMRSREG. .SSQUEUE ,DISP=OLD, 
DCB= (DSORG=DA , OPTCD=RF') 
DSN=&P..VTAMO ,DISP=OLD, 
DCB= (DSORG=DA , OPTCD=RF') 
DSN=&P. .BTAMQ,DISP=OLD, 
DCB= (DSORG=DA , OPTCD=RF) 


LL RRR RRR KEKE KEKE KKK EEK KEKREKKEEKKKKKKER 


//* INTERCOMM DATASETS * 

[ [RRR KEEKKEKKKKEKE 
//* 

//RCTOOO DD DSN=&P..RCT000,DISP=SHR, 

// DCB= (DSORG=DA , OPTCD=RF) 

//* 

[ [ERR KRKKEEKKEKKEKKKEKKKKKKKE 


//* CHECKPOINT/RESTART DATASETS * 
[LL RRR RRR KKK KEKE KERR ERK KEKE KREREKEEKKKKKKKKKKE 
//* 
//STRTUPSW DD DSN=&P..STRTUPSW,DISP=SHR, 
// DCB= (DSORG=DA , OPTCD=R) 
//CHEKPTFL DD DSN=&P..CHEKPTFL,DISP=OLD, 
// DCB= (DSORG=DA , OPTCD=RF) 
//LOGDISK DD UNIT=SYSDA,SPACE=(4096, (20,10) ,RLSE), 
// DCB= (DSORG=DA , BLKSIZE=4096 , RECFM=F) 
//RESTRTLG DD DSN=&P..&IMRSREG. .INTERLOC, 
// DCB= (DSORG=PS , RECFM=U , BLKSIZE=4100), 
// DISP=(OLD, PASS) 
DSN=&P. . SIMRSREG. . INTERLOG, 
DCB= (DSORG=PS , RECFM=U , BLKSIZE=4100), 
DISP= (OLD, PASS) 


(continued) 
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Multiregion Job 90 continued: 


[ [RRR RRR KERR EKER EEK KKK KE 


//* FILE STATISTICS DATASET * 
LL RRR KKK ERE EKEEKEKEEKKKKKAKKKEKKEKK KKK 


//* 

//STATFILE DD DSN=&P..STATFILE,DISP=(OLD,KEEP) , 

if DCB= (DSORG=PS , BLKSIZE=560 , RECFM=FB , LRECL=28) 
1 el 

] [ek DO ook kk 


//* SECURITY DATASET * 

[ [RRR REE EAKEEKKKKKKKKEKKKKEKAKK KEKE 

//* 

//SECURITY DD DSN=&P..SECURITY,DISP=OLD, 

// DCB= (DSORG=DA , OPTCD=R) 

//* 

[ [RRR KERR KEKE KKK KKK KK KS 


//* CHANGE/DISPLAY DATASET * 
[ [RRR KKKKKKKK KEKE 
Vi* 

//DESO0OO DD DSN=&P..DESO00,DISP=SHR, 

// DCB= (DSORG=DA,OPTCD=RF) , 

//* 

LL RRR KEKE EKER KK KK KER 


//* STORE /FETCH DATASETS * 
LL RRR KIKI KKE 


//* 
//INTSTORO DD DSN=&P. .&IMRSREG. .INTSTORO,DISP=OLD, 
// DCB= (DSORG=DA , OPTCD=EF , LIMCT=3) 
//INTSTOR2 DD DSN=&P..S&IMRSREG. . INTSTOR2 ,DISP=SHR, 
// DCB= (DSORG=DA , OPTCD=EF , LIMCT=3) 
//INTSTOR3 DD DSN=&P. .&IMRSREG. . INTSTOR3 ,DISP=OLD, 
// DCB= (DSORG=DA , OPTCD=EF , LIMCT=3) 

* 
Ueueia eager oe axe Gedecsiuasacss 


//* DDQ DATASETS * 

[ [RRR EKKEKKEE 

//* 

//PMIQCFDD DD DSN=&SP..QCF,DISP=SHR, 

// DCB= (DSORG=DA , OPTCD=RFE , LIMCT=3) 
//PMISCFDD DD DSN=&P..SCF,DISP=SHR, 

// DCB= (DSORG=DA , OPTCD=RF) 

//DDQDEF DD DSN=S&P..&IMRSREG. .DDQDEF,DISP=SHR, 
// DCB= (DSORG=DA , OPTCD=RF) 

//THREDLOG DD DSN=&P..&IMRSREG. .THREDLOG,DISP=OLD, 
// DCB= (DSORG=DA , OPTCD=RF) 

//* 


(continued) 
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Multiregion Job 90 continued: 


[ [RRR REE KKKEEKR EKER KREEEEKEKKKKKKEKKE KEK KEKE 


//* ADD USER FILES HERE BEFORE PMISTOP DD * 

| [RRR RRR RRR KERR KEKE KKK KEKE 
//* 

//PMISTOP DD DUMMY 

//LPSPALIB DD DSN=SYS1.LPALIB, DISP=SHR 

//* 

//* FILE ATTRIBUTE RECORD (FAR) PARAMETERS 
//* 

/ /ICOMIN DD DSN=&P..SYMUSR(&FARPARM) ,DISP=SHR 
//* 

[ [RRR RHR KR REE KKK KKK KEKE 

//* DYNLLIB - * 

//* NOT SHAREABLE WITH OTHER REGIONS * 

[ [RRR RRR REE KKK RE KEKKEEKKKEKKKEKEKKKKEK KEKE 

//* 

//DYNLLIB DD DSN=S&P..&IMRSREG. .MODDYNL ,DISP=SHR 
[ [RRR RRR RERE KEKE KEE REKEREEKEKEKEKEKKKKEKE 


//* DYNLINK DATASET * 

| [RRR RRR KERR KKK KEE ERE KEKE KKK 

//* 

//DYNLPRNT DD SYSOUT=A 

//* 

//* REMOVE FOLLOWING (TP DEVICES) IF NOT CONTROL REGION 
//* 


[ [RRR EREEKEEKEKEEEKEEKKKEES 


//* TP DEVICES * 

[ [ERE EKEKREKEKKEKKKKEKKKKES 

//REMOTE DD UNIT=039 

//* 

//SNAPDD DD SYSOUT=A,FREE=CLOSE, 

// SPACE= (CYL, (10) ) 

//SYSUDUMP DD DUMMY 

//INTERLOC DD DSN=&P..&IMRSREG..INTERLOC, 

// DISP=SHR, 

// DCB= (DSORG=PS , BLKSIZE=4100 , RECFM=VB, 
// LRECL=4096 ,NCP=8 , OPTCD=C) 

//* 


(continued) 
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Multiregion Job 90 continued: 


[ [ERE KREREKRKEKKKK RK KKK KE 


//* LOGPRINT * 

[LEEK KEKKKKKKKKKKEKKKKEKE 

//* 

//LOGPRINT EXEC PGM=LOGPRINT , COND=EVEN 
//STEPLIB DD DSN=&P..MODREL,DISP=SHR 
//SYSPRINT DD SYSOUT=A, 

// DCB= (DSORG=PS , BLKSIZE=121) 
//SYSIN DD DUMMY ,DCB=BLKSIZE=80 

//* 

[ [RRR REKEEKKKAKKKKK KKK KKK KKK KK KEKE 


//* INTERCOMM LOG DATASET * 
[ [RRR ERE KR RK KEK 


//* 

//INTERLOG DD DSN=E&P..&IMRSREG. .INTERLOG, 
// DCB=BLKSIZE=4100, 

// DISP= (OLD, KEEP , KEEP) 

// DSN=&P..&IMRSREG. .INTERLOC, 
// DCB=BLKSIZE=4100, 

// DISP= (OLD, KEEP, KEEP) 

./ ENDUP 

// 
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APPLICATION PROGRAMMING WORKSHOP PREPARATION 


Installations anticipating an Intercomm Application Programming Workshop may 
prepare for testing by executing the job stream provided in member names WRKSHP (for 
installations using Edit and Output) or WORKSHPM (for those using Message Mapping 
Utilities) on SYMREL. 


All steps in the WRKSHP job stream up to and including the generation of test 
data (S9FILE) may be executed prior to arrival of the instructor. For the WORKSHPM job 
stream, the steps up to the linkedit (STEP10) may be executed. 


Note that the JCL allocates test library space (SYMCLS and MODCLS) on the 
same volume where INT.SYMREL resides. Should this conflict with installation practices, 
the allocation step should be modified. All Intercomm data set names start with the high- 
level qualifier INT; change that name if the default is not used. 


Chapter 7 
VTAM OR TCAM FRONT END INSTALLATION 


7.14 VTAM 


VTAM support under Intercomm is an extra cost Special Feature (except to new 
users with a bundled system), and must be ordered by the prospective user. In order to 
implement System Network Architecture terminal support via VTAM, the user must 
consider several areas of installation: 


e SNA Controller Application Design 

e Subsystem Design 

e VTAM Front End Installation 

e Dynamic LU Support (new for Release 11) 


Complete details are provided in the Intercomm SNA Terminal Support Guide. 


7.2 VTAM LU6.2 Inter-Application Support 


An interface to another APPC system (Intercomm, CICS, etc.) via LU6.2 is 
available as an external (to bundled system) extra cost feature. Implementation is 
described in the SNA LU6.2 Support Guide. 


7.3. TCAM 


In order to operate Intercomm under TCAM, the extended TCAM support requires 
the Generalized Front End facility (a Special Feature). If the facility is used solely for the 
support of TCAM, it is provided to the installation at no additional cost. New users 
receiving a bundled system are automatically provided with both the TCAM and GFE 
interface. Existing installations using early releases of Intercomm with basic TCAM 
(interfaced without GFE) are no longer supported. 


Operation under TCAM further requires that the user provide a Message Control 
Program to execute in a separate region. The user-written MCP manages the terminal 
network and places input messages on a Process Queue defined to Intercomm. 
Conversely, Intercomm places output messages on a Destination Queue accessed by the 
MCP. 


Until such time as the MCP is designed and implemented, Intercomm may be 
executed in Test Mode. 


Complete details are provided in the Intercomm TCAM Support Users Guide. 
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EXTENDED CAPABILITIES INSTALLATION 


Several facilities are available to expand Intercomm beyond its basic functions as 
a TP Monitor. Customers purchasing the complete, bundled Intercomm already have 
these features. For others, such capabilities are available at an additional charge beyond 
the basic system fee. The items in the extended capabilities (Special Feature) category 
for Intercomm Release 11 are as follows: 


Generalized Data Base Management System Interface 
DL/I Support 

TOTAL Support 

ADABAS Support 

IDMS Support 

VTAM Support (SNA) 

Extended TCAM Support 
Generalized Front End Facility (GFE) 
Multiregion Support Facility (MRS) 
File Recovery (FR) 

Data Entry System 

CRT Page Facility 

Dynamic File Allocation (DFA) 
Dynamic Data Queuing (DDQ) 
Autogen Facility 

Extended Security System (ESS). 


Each extended capability is documented by a separate publication which includes 
a description of its facilities, and implementation and installation procedures. Please refer 
to the Intercomm Publications page of this manual. 


Note that the following features are included with the basic system: ASMF, BTAM 
support, Message Mapping Utilities, Store/Fetch Facility, Table Facility, the basic Utilities 
(Edit, Output, Change and Display), basic security support, High-Level Language support, 
Year 2000 compliance, OS/390 compatibility, and 31-Amode storage and pools support. 
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MVS INSTALLATION TUNING 


Intercomm supports ESA at level 4.3 and higher and all levels of OS/390. It is 
also assumed that DFSMS, rather than DFP, is in use at the user’s site. Initial installation 
follows the standard procedures described in the previous sections. However, the 
Intercomm system as released does not automatically utilize all of the system's MVS 
facilities, as many functions are based upon installation-dependent specifications. 


Following the initial installation, tuning of the MVS operation may be accomplished 
by updating the linkedit deck to include specifications for Csect ordering and page 
boundary alignments. 


For a detailed description of Intercomm MVS specifications, see the Operating 
Reference Manual. Guidelines for tuning the Intercomm system on an ongoing basis are 
provided in Chapter 11 of the Operating Reference Manual. 
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Chapter 10 


PRODUCT MAINTENANCE 


10.1 INTRODUCTION 


As with any complex software system, mechanisms must be provided to permit 
correction of problems detected as the system encounters unforseen permutations of 
environment, terminals and the operating system. Such mechanisms also serve as a 
convenient means of distributing system enhancements. These services are available 
only to subscribers to our Product Maintenance Agreement. 


10.2 S.E.ON DUTY 


We appreciate the urgency of certain questions or need for help which can not 
wait for normal mail turnaround or the arrival of a field support Systems Engineer. To 
meet this need, we have established an "S.E. on Duty” (SEOD) telephone hotline. 


Users requiring assistance may contact the SEOD by calling (212) 376-3260 
during office hours (New York time), and selecting Intercomm technical support. 


10.3 MSR PROCESSING 


Maintenance Service Requests (MSRs) are submitted by the user when an 
Intercomm problem occurs which the user is unable to solve. The form should be fully 
completed and sent with as much documentation as possible to enable us to find a 
solution. Do not send material, particularly snaps and dumps, on microfiche or tape. 
Before sending the MSR, however, consult with the SEOD regarding a possible existing 
solution, or supporting documentation (tables, snaps, etc.) needs. 


Headquarters Engineering will examine the problem and notify the user as to 
whether it is a product error, a user error, or an error of another vendor. In the event of a 
product error having been discovered, an Experimental System Modification (XM) is 
written to fix the problem and is given to the user. It is then the responsibility of the user 
to test the fix and inform us of the results as soon as possible. MSRs should be sent to: 


Intercomm Product Manager 
lsogon Corporation 
330 Seventh Avenue 
New York, New York 10001 


An MSR form is included at the back of this manual. Please make copies to send 
with maintenance, enhancement, and publications update requests. 
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10.4 SYSTEM MODIFICATIONS 


System Modifications (SM’s) are issued via tape on a periodic basis after testing of 
the modifications. A cumulative index on a module basis and a current SM listing is 
included with each distribution. 


It is up to the user to determine whether or not an SM should be applied to their 
system. We strongly recommend that all SM’s be applied using the ASMF Facility 
described in ASMF Users Guide. We apply them to the official Intercomm Release 
before release to users in order to run a regression test, and insure the accuracy of these 
fixes. 


The SM’s are released as source code changes to the module(s) being updated, 
plus changes to the SM index module (AAAAAAAA). AAAAAAAA is used to account for 


SM’s that have been applied. If SM's are applied using the ASMF Facility; then SMS (in 
addition to AAAAAAAA) is updated. 


10.5 TECHNICAL INFORMATION BULLETINS 

To share the benefit of other users' experiences, and to reduce the probability of 
encountering known problems, Technical Information Bulletins (TIBs) are published 
periodically and include such items as: 

e Frequently made user coding or table errors 


e Techniques for better design of programs or systems 


e BM software errors and their corresponding PTFs or APARs that may be 
needed at Intercomm installations 


e Non-IBM equipment and/or software problems and suggested corrective action 
e Suggestions for better utilization of Intercomm features. 
User-contributed TIB items may be forwarded to: 
Intercomm Product Manager 
Isogon Corporation 


330 Seventh Avenue 
New York, New York 10001 


10.66 EARLY WARNINGS 


Early Warnings are a summary of problems reported and their solution. Early 
Warnings are listed and sent as necessary to all customers covered by the maintenance 
contract. 
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10.7 SYSTEM PUBLICATION REVISIONS 


System Publication Revisions (SPRs) and/or new editions are published 
periodically when new or revised documentation becomes necessary. Users must 
maintain at all times an up-to-date copy of each Intercomm manual. Note, however, that 
documentation revisions correspond to the current SM level of the system, and therefore 
users must also keep their Intercomm system up to date. 


New Publication Price Lists for manuals and SPRs are issued periodically and 
mailed with the Early Warnings. Please use the price lists to order additional copies by 
mail, or telephone the SEOD (see section 10.2). If ordering by telephone, please 
prearrange for a company Purchase Order Number to be provided as authorization for 
the order. 


In trying to make our documentation more adaptable to the needs of our users, we 
recommend the utilization of the MSR form with notes on the manual, page number and 
suggested change. 


This form should be filled out and sent to: 


Manager, Publications Department 
Isogon Corporation 
330 Seventh Avenue 
New York, New York 10001 


10.8 FIELD ENGINEERING SUPPORT 


Field engineering consulting services, by an Intercomm Systems Engineer from 
Isogon corporation, are available to Intercomm users on site to install a new or updated 
Intercomm release, to review such an installation, and/or to develop user-specific 
enhancements or modifications to the Intercomm system. A daily fee plus travel and 
living expenses will be charged to the requesting user site. Optionally, a funded 
enhancement may be developed at Isogon and taken to the user site for final installation 
and testing. To arrange for field engineering services, please contact the Intercomm 
Product Manager at Ilsogon Corporation at 212-376-3200. 
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ORDERING NEW RELEASES 


Current releases of Intercomm can be ordered at any time. All current release 
tapes reflect the latest officially released SM level. 


The Intercomm release is created on a new tape to minimize I/O error problems; 
this tape remains the property of your account. Product Maintenance Agreement 
subscribers are entitled to each new release of the system, including appropriate 
documentation, at no charge. There is a charge for subsequent release tape requests. 


A "Request for Intercomm System Release Tape" form is enclosed at the back of 
this manual. 


Chapter 12 


RELEASE 9 CONVERSION 


12.1 INTRODUCTION 


For existing Release 8 users, conversion to Release 9 should go smoothly if the 
table changes described in Chapter 3 and other recommendations contained in this 
manual and the Release 9 Planning Guide are followed. For example, the only system 
data set that needs recreation is RCTOOO due to larger block size requirements and 
Intercomm supplied Report changes and that Reports 2000 through 2003 have been 
eliminated. Optionally, all the Reports may be made core-resident. Many tables, except 
those for which assembly jobs are generated (see Chapter 5), do not have to be 
reassembled, but do need to be moved to the Release 9 SYMUSR and MODUSR. In 
particular, ensure that data set concatenations for assemblies and linkedits reference only 
the Release 9 libraries. 


For users with a Multiregion Intercomm system, Release 9 may be implemented 
on a region by region basis. A Release 8 control region may communicate with a 
Release 9 satellite region and vice versa. However, if single region logging is used, the 
control region and all satellite regions using the control region log must be at the same 
release level. Also, if the Link Pack Facility is used, all regions referencing modules in the 
Link Pack, as well as the LPA modules themselves, must be at the same release level. 
Be careful when specifying STEPLIB concatenations for the Intercomm execution JCL. 


12.2 CONVERSION CONSIDERATIONS 


In addition to the recommendations in the Release 9 Planning Guide, the following 
should be noted: 


e Obsolete globals have been eliminated from INTGLOBE, SETGLOBE, 
ENVIRON, SETENV, and DDQENV. 


e lf global setting changes were made to FEMACGBL (to allow definition of more 
than 1000 terminals, subsystems, etc.) for Release 8, then those same 
changes must be applied to the Release 9 version. Also modify the SUBSYS 
macro if more than 1000 are coded in PMIRDTnn in a Multiregion 
environment. See also Technical Information Bulletins. 


e If changes were made to the LOGSETGB global table for Release 8, then 
reapply the changes for Release 9 and reassemble Log Analysis modules. 


e User modifications to Intercomm modules must be carefully evaluated due to 
the number of Release 9 enhancements and renumbering of many modules. 
See also the documentation for the new CHANGER utility in the Operating 
Reference Manual, Chapter 12. 
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All tested Experimental SMs through 1237 which were provided for Release 8 
and listed on various Early Warnings publications up through 3/1/83 have been 
incorporated in Release 9. Call the SEOD if you have questions regarding EX 
SMs which you may have in the Release 8 system. New Experimental SM’s 
start at number 0001. Use the latest Early Warnings listing to determine if any 
new EX SM’s apply to your Release 9 system. 


Corrections and enhancements to ASMF modules previously provided as zaps 
have been incorporated. Both the AAAAAAAA and SMS modules are 
upgraded to Release 9 - base SM level 1497. 


The load module for assembly of the ASMF SMPROF macro is now called 
ASMFPROF to prevent confusion with the TSO PROFILE module. 


ICOMVCON and ICOMCESD do not need to be relinkedited as the supplied 
versions do not have the RENT attribute. 


The ICOMSBS copy module for COBOL programs has been revised and 
cleaned up but is downward compatible. User additions to this member must 
be reapplied. 


User additions to the PL/1 copy member PLIENTRY must be reapplied. 


For MMU users, the LOADMAP utility has been prelinkedited as member 
LOADMAPS as documented in Message Mapping Utilities. 


If there is any user dynamically loaded subsystem or subroutine larger than 
200K, then increase the fullword value in GAMFQES accordingly, to ensure 
enough core is available to load a large module (no longer needed under 
Release 10 or 11). 


12.3. INTERCOMM DSECT CHANGES AND ADDITIONS 


Descriptive comments and alignments have been revised in most of the Dsects. 
In particular, note the following: 


SPALIST - obsolete fields reused for new entries 


BTSPA - completely revised and reorganized - reassemble and check user 
modules which reference this area 


VTAM Dsects - many changes necessitate reassembly of all user exit and 
other routines which reference VTAM tables and areas 


PTRDSECT and PEXTABLE - expansion requires reassembly of BTAM/TCAM 
user exits referencing these Dsects (for BTERM macro) 


AIDGRP/AIDDATA macro expansion changed, a new Dsect AIDSECTS is 
provided to describe the generated table areas 
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e MSGHDR/MSGHDRC - file recovery fields rearranged to provide date/time 
field initialization. Also ensure MSGHPID field not referenced by any user 
programs 


e IXFDSCTA - changed for VSAM file enhancements, etc. check user additions 
and modifications 


e FRDSECTS for the File Attribute Block (FAB) modified for new FAR options 
e DDSASECT - new return codes for MVS (see Dynamic File Allocation) 
e DYNDSECT - new fields for SUBMODS macro changes 


e COBDSECT - provided for 256-byte prefix to COBOL subsystem/subroutine 
DWS area; field placements changed 


e Intercomm pool sizes now in doublewords (not bytes) in pool header 
(RMDSECTS) and RCB (RCBCONWD field) 


e INTENQ/DEQ enqueue-id expanded to 44 bytes (NQDSECTS) - see Basic 
system Macros 


e DVMODIFY - expanded for alternate buffer and line size changes 

e MMUDDMWK area expanded (used by MMU DDM modules) 

e MMUVT - field labels changed 

e SFCOREDS contains a local global DMPRST which is used to control the 
Dsect expansion in the off-line utility SFDMPRST. If any user modules copy in 
this Dsect, the statement LCLB DMPRST must be inserted at the beginning of 
the module. The default setting of zero is to be used 


e INTTCB for Intercomm Thread Control Block contains new switch settings. 
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RELEASE 10 CONVERSION 


13.1 INTRODUCTION 


For existing Release 9 users, conversion to Release 10 should go smoothly if the 
table changes described in Chapter 3 and other recommendations contained in this 
manual and the Release 10 Planning Guide are followed. For example, the only system 
data set that needs recreation is RCTOOO due to larger block size requirements and 
Intercomm-supplied Report changes. Optionally, all the Reports may be made core- 
resident. Many tables, except those for which assembly jobs are generated (see Chapter 
5), do not have to be reassembled, but do need to be moved to the Release 10 SYMUSR 
and MODUSR. In particular, ensure that data set concatenations for assemblies and 
linkedits reference only the Release 10 libraries. 


For users with a Multiregion Intercomm system, Release 10 may be implemented 
on a region by region basis. A Release 9 control region may communicate with a 
Release 10 satellite region and vice versa. The only requirement is that the Release 10 
version of MRINPUT must be linked with Release 9 regions (for BMN field conversion in 
the message header of messages transferred to the region). However, if single region 
logging is used, the control region and all satellite regions using the control region log 
must be at the same release level. Also, if the Link Pack Facility is used, all regions 
referencing modules in the Link Pack, as well as the LPA modules themselves, must be 
at the same release level. At SM level 2089 or higher, if using a mixed 9 and 10 
Multiregion system with ESS, the Release 9 INTSECOO (assembled under Release 9) 
must be used in a Release 10 Satellite Region if the Control Region is Release 9. If the 
Control Region is Release 10, then the Release 10 INTSECOO must be included in 
Release 9 Satellite Regions. Be careful when specifying STEPLIB concatenations for the 
Intercomm execution JCL. 


13.2 CONVERSION CONSIDERATIONS 


In addition to the recommendations in the Release 10 Planning Guide, the 
following should be noted: 


e Obsolete globals have been eliminated from INTGLOBE, SETGLOBE, 
ENVIRON, and SETENV. 


e lf global setting changes were made to FEMACGBL (to allow definition of more 
than 1000 terminals, subsystems, etc.) for Release 9, then those same 
changes must be applied to the Release 10 version, including to the 4 new 
globals at the bottom of the table. 


e |f changes were made to the LOGSETGB global table for Release 9, then 
reapply the changes for Release 10 and reassemble Log Analysis modules. 
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e If changes were made to the DDQENV global table for Release 9, then copy 
that version to the Release 10 SYMLIB or apply the changes to the Release 
10 copy from the Release 10 SYMREL. 


e User modifications to Intercomm modules must be carefully evaluated due to 
the number of Release 10 enhancements and renumbering of some modules. 
See also the documentation for the CHANGER utility in the Operating 
Reference Manual, Chapter 12. 


e All tested Experimental SM’s through 359 which were provided for Release 9 
and listed on various Early Warnings publications up through 4/1/88 have been 
incorporated in Release 10, that is, Release 9 SM’s 1731 through 1844 were 
incorporated in Release 10 under their XM numbers. Release 9 SM’s 1928 to 
2013 were incorporated in Release 10 SM’s through 2089. Call the SEOD if 
you have questions regarding EX SM’s which you may have in the Release 9 
system. Release 10 Experimental SM’s started at number 500. Use the latest 
Early Warnings listing to determine if any new EX SM’s apply to your Release 
10 system. 


e Corrections and enhancements to ASMF modules previously provided as zaps 
have been incorporated. Both the AA\AAAAA and SMS modules are 
upgraded to Release 10 - base SM level 1730. Current SM level in SMS is the 
same as that given on the Release 10 installation tape. 


e ICOMVCON and ICOMCESD do not need to be relinkedited as the supplied 
versions do not have the RENT attribute. 


e The ICOMSBS copy module for COBOL programs has additions but is 
downward compatible. User additions to this member must be reapplied. 


e User additions to the PL/1 copy members PENTRY and/or PLIENTRY must be 
reapplied. 


e PMICANC and RPT00008 changed - incorporate in user version, if used. 


e RPTO00028 now used for LMAP command responses, not for Fine Tuner 
commands. 


e Dynamic File Allocation Facility code moved from File Handler (IXFHND01), to 
a new module IXFDYNAM. 


e ff using VSAM LSR pools under DFP 2.3 (XA 2.2) or higher, and the pools 
should be above the 16M line, add the parameter LSR31=YES to the SPALIST 
definitions for the applicable regions. See Basic System Macros. 


e KEYFLIP and GAMFQES are no longer used: also remove ORDER linkedit 
statements for them, as well as for the EXECWAIT Csect (no longer exists). 


e Add SUBSYS macros for the new Intercomm subsystem codes for LMAP, 


FINTUNER, DYNSSUP and SYSCNTL to all regions in PMIRDTOO if 
Multiregion used (see INTSCT on SYMREL). 
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e MAPACCT macro for the SAM (System Accounting and Measurement 
Statistics - see Operating Reference Manual) table no longer supports the 
PFAULTS parameter, and now supports COBREENT, PAGE, and Table 


Facility calls. See Basic System Macros. 


e If SAM statistics reporting is used, it is necessary to change the SORT FIELDS 


control card (see Operating Reference Manual, page 8-20) by replacing the 
offset value 29 with the value 41 (saved MSGHRSCH byte). 


e User Assembler programs issuing the ESS SECTEST macro must be 
reassembled. 


e WARNING - if using ESS, after the Security file has been used for sign-on 
under Release 10 (for testing), it can no longer be used under Release 9 due 
to the password encryption enhancement. It is recommended to copy the 
Release 9 file using the ESS expansion option for executing the SECFILE 
utility (see Extended Security System), and use the expanded file for Release 
10. Also reapply user mods to SECUEXIT (if used) which has many changes. 


e The new Table Facility requires no special installation other than several new 
SPALIST macro parameters (see Table Facility). The execution module 
INTTABLE is automatically included via ICOMLINK. 


e PAGETBLE and SRCHPTBL are no longer used by the Page Facility and the 
Page data sets are no longer needed. See Page Facility for new SPALIST 
macro parameters. 


e The TUNERTBL is obsolete (see System Control Commands for syntax on 
Fine Tuner commands (BEGN, DELY, etc.)). 


e To use the new FTUN and SSUP commands (see System Control 
Commands), installation of MMU (see Message Mapping Utilities) is required. 


e The VTIDTABL can be eliminated by coding the associated Vtam-name on 
each applicable LUNIT via the new VTID parameter. 


e If still using BTAM terminals, note that the BTAMSCTS table may be 
eliminated by coding queuing parameters on each BTERM macro (see Basic 
System Macros). Also note that the CPU console may be defined as a VIAM 
LUNIT (see SNA Terminal Support Guide) to eliminate BTAM support, whether 
or not it is the control terminal. 


e User Assembler programs and user exits issuing the INTTIME macro must be 
reassembled and must have a local or acquired save area to be used as a 
work area and to save and restore the issuer's registers (2-12 only). 


e User Assembler programs and user exits issuing the LINKAGE, SUBLINK, 


RTNLINK, STORAGE, and/or STORFREE macros should be reassembled 
due to 31-Amode support changes. 
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13.3 INTERCOMM DSECT CHANGES AND ADDITIONS 


Descriptive comments and alignments have been revised in most of the Dsects. 
In particular, note the following: 


SPALIST - obsolete fields reused for new entries: if a parameter is not 
documented in Basic System Macros, it is not supported and must be 
removed. 


BTSPA - some fields added - reassemble and check user modules which 
reference this area 


VTAM Dsects - many changes necessitate reassembly of all user exit and 
other routines which reference VTAM support tables, macros, and areas; an 
LBX area has been added to LUDSECTS for Extended LU6.2 


PLNDSECT - minor changes require reassembly of BTAM/TCAM user exits 
referencing this Dsect (for BLINE macro) 


DDQSECTS - changes require reassembly of any user routines referencing 
the DDQ Dsects 


MSGHDR/MSGHDRC - BMN-number field moved (to last 3 bytes of old 
MSGHPID field): now 3 bytes instead of 2. MSGHCON replaced by 
MSGHFLGS and flag settings revised. MSGHRETN and MSGHMRDX moved 
to overlay MSGHBLK field. Corresponding changes made to ICOMDWS, 
ICOMINMG, PLMSGHD and PL1HDR 


PGEDSECT completely changed and RQEDSECT no longer used by the 
revised Page Facility 


IXFDSCTA - changed for VSAM file enhancements, etc.: check user additions 
and modifications 


DDSASECT - new return codes for VSAM support (see Dynamic File 
Allocation) 


DYNDSECT - field size changes and additions for SUBMODS macro changes, 
statistics 


COBDSECT - for 256-byte prefix to COBOL subsystem/subroutine DWS area; 
flags and COBOL 2 support changes added 


SFTABLE for Store/Fetch core table expanded with counters for detailed 
System Tuning Statistics 


INTTCB for Intercomm Thread Control Block contains new switch settings, a 
different BMN save field, renamed and new fields. Add user fields just before 
ITCBLEN EQUate, and reassemble FDITCB and PMISNAP 1 

INTSEC and ICP for ESS have field definition changes and additions 


LPINTFC and LPSPA have changes - see Basic System Macros 
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e SCTLISTC for SYCTTBL macro expansion has many changes - user modules 
or changes referencing the SYCTTBL area may need revision 


e STALIST for STATION macro has some labels removed, check user mods 
referencing this area. Label on first STATION macro no longer required, 
labels on subsequent STATION macros ignored. Generic Station Table 
entries may be defined (see SNA Terminal Support Guide) 


e PVRBTBLE (for BTVERB macro) has 2 bytes added (for Extended LU6.2 
support) - reassemble user modules referencing this area. 
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RELEASE 11 CONVERSION 


14.1 INTRODUCTION 


For existing Release 9 and 10 users, conversion to Release 11 should go 
smoothly if the table changes described in Chapter 3 and other recommendations 
contained in this manual and the Release 11 Planning Guide are followed. For example, 
the only system data set that needs recreation is RCTQOO due to larger block size 
requirements and Intercomm-supplied Report changes. Optionally, all the Reports may 
be made core-resident. Many tables, except those for which assembly jobs are 
generated (see Chapter 5), do not have to be reassembled, but do need to be moved to 
the Release 11 SYMUSR and MODUSR. In particular, ensure that data set 
concatenations for assemblies and linkedits reference only the Release 11 libraries. 


For users with a Multiregion Intercomm system, Release 11 may be implemented 
on a region by region basis. A Release 9 or 10 control region may communicate with a 
Release 11 satellite region and vice versa. The only requirement is that the Release 11 
version of MRINPUT must be linked with Release 9 regions (for BMN field conversion 
from 3 bytes to 2 bytes in the message header of messages transferred to the region). 
However, if single region logging is used, the control region and all satellite regions using 
the control region log must be at the same release level. Also, if the Link Pack Facility is 
used, all regions referencing modules in the Link Pack, as well as the LPA modules 
themselves, must be at the same release level. If using a mixed 9 or 10 Multiregion 
system with Release 11 and ESS, the Release 9 or 10 INTSECOO must be included in 
Release 11 Satellite Regions if the Control Region is Release 9 or 10. If the Control 
Region is Release 11, then the Release 11 INTSECOO must be included in Release 9 or 
10 Satellite Regions. Be careful when specifying STEPLIB concatenations for the 
Intercomm linkedit and for the execution JCL. 


14.2 CONVERSION CONSIDERATIONS 


In addition to the recommendations in the Release 11 Planning Guide, the 
following should be noted: 


e User modification to the IBM SPLEVEL macro is no longer needed. 
Installation Job 06 to copy the macro to SYMLIB has been replaced by the 


BMN Back-off Installation (if needed). Ensure that old versions of the 
SPLEVEL macro are removed from user libraries for Release 11 and correct 
any user programs using the macro. 


e Obsolete globals have been eliminated from INTGLOBE and SETGLOBE. 


e Global setting changes to FEMACGBL (to allow definition of more than 1000 
terminals, subsystems, etc.) are no longer needed. 
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e If changes were made to the LOGSETGB global table for Release 9 or 10, 
then reapply the changes on to the Release 11 SYMLIB and reassemble Log 
Analysis modules (see Operating Reference Manual, Chapter 12). 


e lf changes were made to the DDQENV global table for Release 9 or 10, then 
copy that version to the Release 11 SYMLIB or apply the changes on SYMLIB 
to the Release 11 copy from the Release 11 SYMREL. 


e User modifications to Intercomm modules must be carefully evaluated due to 
the number of Release 11 enhancements and renumbering of some modules. 
See also the documentation for the CHANGER utility in the Operating 
Reference Manual, Chapter 12. 


e All tested Experimental SM’s through 920 which were provided for Release 10 
are incorporated in Release 11. Call the SEOD if you have questions 
regarding EX SM’s which you may have in the Release 9 or 10 system. 
Release 11 Experimental SM’s start at number 1000. Use the latest Early 
Warnings listing to determine if any new EX SM’s apply to your Release 11 
system. 


e Both the AAAAAAAA and SMS modules are upgraded to Release 11 - base 
SM level 2300. Current SM level in SMS is the same as that given on the 
Release 11 installation tape. 


e The ICOMSBS copy module for COBOL programs has additions but is 
downward compatible. User additions to this member must be reapplied. 


e User additions to the PL/1 copy members PENTRY and/or PLIENTRY must be 
reapplied. 


e User Assembler programs issuing the ESS SECTEST macro must be 
reassembled. 


e WARNING - if using ESS, after the Security file has been used for sign-on 
under Release 11 (for testing), it can no longer be used under Release 9 or 10 
due to the Year 2000 enhancements. It is recommended to copy the Release 
9 or 10 file using the ESS expansion option for executing the SECFILE utility 
(see Extended Security System), and use the expanded file for Release 11. 
Other required steps to convert the copied file for Y2K enhancements are 
described in the Release 11 Planning Guide. Also carefully review user mods 
to SECUEXIT (if used) which has changes and is resequenced. 


e User Assembler programs and user exits issuing the INTTIME macro must be 
reassembled and must have a local or acquired save area to be used by the 
macro as a work area and to save and restore the issuer’s registers (2-12 
only) Note that the date is now returned with a 4-digit year in the form 
yyyyddds. 


e User Assembler programs and user exits issuing the GETDATE macro must 
be reassembled to have a 4-digit year returned in the form yyyyddds. If used, 
the ADDR parameter must point to a 4-byte field where the date will be stored 
(not moved - length modifier for base/displacement value no longer 
supported). 
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User Assembler programs and user exits issuing the LINKAGE, SUBLINK, 
RTNLINK, STORAGE, and/or STORFREE macros should be reassembled 
due to 31-Amode support changes. 


Loadable user Assembler programs linked with INTLOAD must be relinked 
with the Release 11 version of INTLOAD. 


The short forms of the parameters for VTIDTAB macros in the VTIDTABL can 
be used by coding the new VTID (instead of VTAMIDS) parameter, and the 
new ICID (instead of ICOMIDS) parameter. 


Generic Station Table entries may be defined for CRT’s and Printers (see 
Release 11 Planning Guide). 


If MRBATCH is used with user batch programs, they must be relinked with the 
Release 11 MRBATCH. 


If user batch programs are linked with the File Handler modules, they must be 
relinked with the Release 11 versions and the Release 11 BATCHPAK. Note 
that PMISNAP1 (for PMISNAP macro processing) and PMINQDEQ (for 
system INTENQ and INTDEQ macro processing) may be linked with batch 
programs (no longer need the Dispatcher (IJKDSP01)). 


If SAM (System Accounting and Measurement) statistics are gathered on-line, 
then the batch SAMREPT load module must be relinked with the Release 11 
versions of the included load modules and the reassembled user’s 
SAMTABLE. 


lf Log Analysis batch reports are used, then the LOGANAL load module must 
be relinked using the Release 11 versions of the included load modules (after 
reassembly if the LOGSETGB global table is changed). 


The Log Analysis date conversion routine JULIAND has been modified to 
handle 4-digit years, and the year 2000 as a leap year. The 2-digit year field in 
the date parameter area to be passed to the routine has been expanded to, 
and expects, a 4-digit year. Correct user programs, if any, which call this 
routine (See comments at the beginning of the module). 


13.3. INTERCOMM DSECT CHANGES AND ADDITIONS 


New flags and some new fields have been added to some of the Dsects. In 
particular, note the following: 


SPALIST - obsolete fields have been reused for new entries. The SPADATER 
field (was Vcon of PMIDATER) has been replaced (along with the preceding 
unused byte) with the new SPADATEC field described in the Release 11 
Planning Guide. If a parameter is not documented in Basic System Macros, it 
is not supported and must be removed. 


RMDSECTS - field additions for 31-Amode pools changes, statistics. 


ICP for ESS has a field definition added. 


14-3 


Chapter 14 Release 11 Conversion 


MSGHDR/MSGHDRC - as for Release 10, BMN-number field moved (to last 3 
bytes of old MSGHPID field): now 3 bytes instead of 2 (if the BMN back-off 
installation is executed, the old 2-byte BMN number is restored to its original 
position). MSGHCON replaced by MSGHFLGS and flag settings revised. 
MSGHRETN and MSGHMRDX moved to overlay MSGHBLK field. 
Corresponding changes made to ICOMDWS, ICOMINMG, PLMSGHD and 
PL1HDR (except BMN field if the BMN back-off installation is executed). 


VTAM Dsects - many changes necessitate reassembly of all user exit and 
other routines which reference VTAM support tables, macros, and areas. 


A new Dsect, VTIDTABD, has been added to describe a VTIDTABL entry and 
includes fields in the expanded 32-byte version if ‘dynamic’ LU processing is 
implemented. In the base 16-byte entry, the low-order 2 bytes (of the 
Intercomm terminal name 8-byte area) are now used to accumulate a 
successful logon count for statistics processing. 
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REQUEST FOR INTERCOMM SYSTEM RELEASE TAPE 


RELEASE 
CUSTOMER SM LEVEL 
TAPE NUMBER 


INSTALLATION SUPPORT CONTACT 


TITLE TELEPHONE (__) 
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EXECUTIVE CONTACT 
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TAPE DESCRIPTION: 


TAPE TYPE - ( ) 3480 CARTRIDGE (uncompressed) ( ) 12-inch REEL (6250 BPI) 
PRODUCT: 
INTERCOMM - ( ) 902 MVS ( )910 BUNDLED SYSTEM 
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932 IDM - IDMS 947 ESS - EXTENDED SECURITY SYSTEM 
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935 S2K - SYSTEM 2000 ( ) CICS LU6.2 INTERFACE 
936 GDB - GENERALIZED DBMS ( ) EXTENDED LU6.2 INTERFACE 
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